aboutsummaryrefslogtreecommitdiffstats
path: root/perllib
diff options
context:
space:
mode:
authorHakim Cassimally <hakim@mysociety.org>2014-07-25 15:10:57 +0000
committerHakim Cassimally <hakim@mysociety.org>2014-10-16 16:56:27 +0000
commit1708bc30af7176f95f0ec5718289d3a633daf32b (patch)
tree989803d0b6fa594ebca3a86f7d2ef1e489cfc515 /perllib
parent9dacce035c39b52e66b6ebed23b9c33613375ca4 (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.pm1
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 );