diff options
| author | Struan Donald <struan@exo.org.uk> | 2012-03-27 12:54:18 +0100 |
|---|---|---|
| committer | Struan Donald <struan@exo.org.uk> | 2012-03-27 12:54:18 +0100 |
| commit | c93cb823dafba47191f14fd7b31cf7b9d0cf37e0 (patch) | |
| tree | 4a448d6f3907e2acc66b70723d1714ebe7058c56 /perllib/Open311/GetServiceRequestUpdates.pm | |
| parent | 1e0914a87c0b6d43f142e2005f4d322d1fd01023 (diff) | |
add some better success and fail things to open311 module
Diffstat (limited to 'perllib/Open311/GetServiceRequestUpdates.pm')
| -rw-r--r-- | perllib/Open311/GetServiceRequestUpdates.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/perllib/Open311/GetServiceRequestUpdates.pm b/perllib/Open311/GetServiceRequestUpdates.pm index dc8fb7672..db9fe9436 100644 --- a/perllib/Open311/GetServiceRequestUpdates.pm +++ b/perllib/Open311/GetServiceRequestUpdates.pm @@ -12,6 +12,8 @@ sub update_comments { my $requests = $open311->get_service_request_updates( ); + return 0 unless $open311->success; + for my $request (@$requests) { my $request_id = $request->{service_request_id}; |