include timezone in date

3 files changed, 6 insertions, 3 deletions

diff --git a/perllib/FixMyStreet/SendReport/Open311.pm b/perllib/FixMyStreet/SendReport/Open311.pm
index 5cde6faed..6fe2b7845 100644
--- a/perllib/FixMyStreet/SendReport/Open311.pm
+++ b/perllib/FixMyStreet/SendReport/Open311.pm
@@ -7,6 +7,7 @@ BEGIN { extends 'FixMyStreet::SendReport'; }
 
 use FixMyStreet::App;
 use mySociety::Config;
+use DateTime::Format::W3CDTF;
 use Open311;
 
 sub should_skip {
@@ -40,7 +41,7 @@ sub send {
             push @$extra, { name => 'report_title', value => $row->title };
             push @$extra, { name => 'public_anonymity_required', value => $row->anonymous ? 'TRUE' : 'FALSE' };
             push @$extra, { name => 'email_alerts_requested', value => 'FALSE' }; # always false as can never request them
-            push @$extra, { name => 'requested_datetime', value => $row->confirmed };
+            push @$extra, { name => 'requested_datetime', value => DateTime::Format::W3CDTF->format_datetime($row->confirmed_local) };
             push @$extra, { name => 'email', value => $row->user->email };
             $row->extra( $extra );
         }
diff --git a/perllib/Open311.pm b/perllib/Open311.pm
index 48143ebd4..07f4ab369 100644
--- a/perllib/Open311.pm
+++ b/perllib/Open311.pm
@@ -5,6 +5,7 @@ use Moose;
 use XML::Simple;
 use LWP::Simple;
 use LWP::UserAgent;
+use DateTime::Format::W3CDTF;
 use HTTP::Request::Common qw(POST);
 
 has jurisdiction => ( is => 'ro', isa => 'Str' );;
@@ -231,7 +232,7 @@ sub _populate_service_request_update_params {
 
     my $params = {
         update_id_ext => $comment->id,
-        updated_datetime => $comment->confirmed,
+        updated_datetime => DateTime::Format::W3CDTF->format_datetime($comment->confirmed_local),
         service_request_id => $comment->problem->external_id,
         service_request_id_ext => $comment->problem->id,
         status => $comment->problem->is_open ? 'OPEN' : 'CLOSED',
diff --git a/t/open311.t b/t/open311.t
index e84b5f04b..a507241a7 100644
--- a/t/open311.t
+++ b/t/open311.t
@@ -8,6 +8,7 @@ use FixMyStreet::App;
 use CGI::Simple;
 use HTTP::Response;
 use DateTime;
+use DateTime::Format::W3CDTF;
 
 use FindBin;
 use lib "$FindBin::Bin/../perllib";
@@ -186,7 +187,7 @@ subtest 'basic request update post parameters' => sub {
     is $c->param('service_request_id_ext'), 80, 'external request id correct';
     is $c->param('service_request_id'), 81, 'request id correct';
     is $c->param('public_anonymity_required'), 'FALSE', 'anon status correct';
-    is $c->param('updated_datetime'), $dt, 'correct date';
+    is $c->param('updated_datetime'), DateTime::Format::W3CDTF->format_datetime($dt), 'correct date';
     is $c->param('title'), 'Mr', 'correct title';
     is $c->param('last_name'), 'User', 'correct first name';
     is $c->param('first_name'), 'Test', 'correct second name';