diff options
author | Hakim Cassimally <hakim@mysociety.org> | 2014-07-25 15:10:57 +0000 |
---|---|---|
committer | Hakim Cassimally <hakim@mysociety.org> | 2014-10-16 16:56:27 +0000 |
commit | 1708bc30af7176f95f0ec5718289d3a633daf32b (patch) | |
tree | 989803d0b6fa594ebca3a86f7d2ef1e489cfc515 /perllib | |
parent | 9dacce035c39b52e66b6ebed23b9c33613375ca4 (diff) |
Open311: FMS <-> Open311 Endpoint End to end tests
Uses LWP::Protocol::PSGI to avoid having to spawn external processes
in order to test these end to end.
Diffstat (limited to 'perllib')
-rw-r--r-- | perllib/Open311/PopulateServiceList.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perllib/Open311/PopulateServiceList.pm b/perllib/Open311/PopulateServiceList.pm index d1a4d607f..a838d0fdd 100644 --- a/perllib/Open311/PopulateServiceList.pm +++ b/perllib/Open311/PopulateServiceList.pm @@ -46,6 +46,7 @@ sub process_body { my $areas = join( ",", keys %{$self->_current_body->areas} ); warn "Body $id for areas $areas - $mapit_url/areas/$areas.html - did not return a service list\n" if $self->verbose >= 1; + warn $open311->error; return; } $self->process_services( $list ); |