diff options
| author | Struan Donald <struan@exo.org.uk> | 2012-11-21 08:17:53 +0000 |
|---|---|---|
| committer | Struan Donald <struan@exo.org.uk> | 2012-11-21 08:17:53 +0000 |
| commit | 92d7fd49e1954f93c35977ffda84802bf9c8371e (patch) | |
| tree | a7f16c868832a4a078bd9c0431d22a6f99c1215d /perllib/Open311 | |
| parent | a87f6e7dc791c07f2b8c48c6904257092dcb4225 (diff) | |
slightly more useful error messages if fetching Open311 service request updates fails
Diffstat (limited to 'perllib/Open311')
| -rw-r--r-- | perllib/Open311/GetServiceRequestUpdates.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perllib/Open311/GetServiceRequestUpdates.pm b/perllib/Open311/GetServiceRequestUpdates.pm index 656fa9d68..25b960aa7 100644 --- a/perllib/Open311/GetServiceRequestUpdates.pm +++ b/perllib/Open311/GetServiceRequestUpdates.pm @@ -68,7 +68,7 @@ sub update_comments { my $requests = $open311->get_service_request_updates( @args ); unless ( $open311->success ) { - warn "Failed to fetch ServiceRequest Updates: " . $open311->error + warn "Failed to fetch ServiceRequest Updates for " . $council_details->{areaid} . ":\n" . $open311->error if $self->verbose; return 0; } |