diff options
Diffstat (limited to 'perllib/Open311')
| -rw-r--r-- | perllib/Open311/GetServiceRequests.pm | 8 | ||||
| -rw-r--r-- | perllib/Open311/PopulateServiceList.pm | 2 |
2 files changed, 8 insertions, 2 deletions
diff --git a/perllib/Open311/GetServiceRequests.pm b/perllib/Open311/GetServiceRequests.pm index ed920f84b..dc22c61c5 100644 --- a/perllib/Open311/GetServiceRequests.pm +++ b/perllib/Open311/GetServiceRequests.pm @@ -47,9 +47,15 @@ sub create_problems { if ( $self->start_date || $self->end_date ) { return 0 unless $self->start_date && $self->end_date; - $args->{start_date} = DateTime::Format::W3CDTF->format_datetime( $self->start_date ); $args->{end_date} = DateTime::Format::W3CDTF->format_datetime( $self->end_date ); + } else { + my $end_dt = DateTime->now(); + my $start_dt = $end_dt->clone; + $start_dt->add( hours => -2 ); + + $args->{start_date} = DateTime::Format::W3CDTF->format_datetime( $start_dt ); + $args->{end_date} = DateTime::Format::W3CDTF->format_datetime( $end_dt ); } my $requests = $open311->get_service_requests( $args ); diff --git a/perllib/Open311/PopulateServiceList.pm b/perllib/Open311/PopulateServiceList.pm index 30d888eb4..813c27cff 100644 --- a/perllib/Open311/PopulateServiceList.pm +++ b/perllib/Open311/PopulateServiceList.pm @@ -256,7 +256,7 @@ sub _add_meta_to_contact { public_anonymity_required email_alerts_requested ) ], - #2243, + #2243, 'Warwickshire County Council' => [qw( closest_address ) ], |