diff options
| author | Matthew Somerville <matthew@mysociety.org> | 2020-06-22 17:20:10 +0100 |
|---|---|---|
| committer | Matthew Somerville <matthew@mysociety.org> | 2020-07-06 12:23:14 +0100 |
| commit | c7dbb65e2d01e37f276af3db0372123366b3a1a1 (patch) | |
| tree | cb4874cb87ea4c6a02a9004b29a86e21a7ef2382 /perllib/Open311/GetServiceRequests.pm | |
| parent | 64335826ec42217e1a9a98c0dbc1f13ec034ddb4 (diff) | |
Rewrite open311-update-reports to share code.
Make GetUpdates and GetServiceRequestUpdates share a common base;
spot all visible states.
Diffstat (limited to 'perllib/Open311/GetServiceRequests.pm')
| -rw-r--r-- | perllib/Open311/GetServiceRequests.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/perllib/Open311/GetServiceRequests.pm b/perllib/Open311/GetServiceRequests.pm index e5fd6438e..2545f6f29 100644 --- a/perllib/Open311/GetServiceRequests.pm +++ b/perllib/Open311/GetServiceRequests.pm @@ -4,7 +4,6 @@ use Moo; use Open311; use FixMyStreet::DB; use FixMyStreet::MapIt; -use FixMyStreet::App::Model::PhotoSet; use DateTime::Format::W3CDTF; has system_user => ( is => 'rw' ); @@ -85,7 +84,7 @@ sub create_problems { ->active ->search( { body_id => $body->id } ); - for my $request (@{$requests->{request}}) { + for my $request (@$requests) { # no point importing if we can't put it on the map unless ($request->{service_request_id} && $request->{lat} && $request->{long}) { warn "Not creating request '$request->{description}' for @{[$body->name]} as missing one of id, lat or long" |