test that options pass from body to fetching problems

1 files changed, 30 insertions, 0 deletions

diff --git a/t/open311/getservicerequests.t b/t/open311/getservicerequests.t
index 6161ceac7..f8795bd61 100644
--- a/t/open311/getservicerequests.t
+++ b/t/open311/getservicerequests.t
@@ -6,6 +6,7 @@ use_ok( 'Open311' );
 use_ok( 'Open311::GetServiceRequests' );
 use DateTime;
 use DateTime::Format::W3CDTF;
+use Test::MockObject::Extends;
 
 my $mech = FixMyStreet::TestMech->new;
 
@@ -296,6 +297,35 @@ for my $test (
     };
 }
 
+subtest "check options passed through from body" => sub {
+    my $xml = prepare_xml( {} );
+
+    $body->update( {
+        send_method => 'Open311',
+        fetch_problems => 1,
+        comment_user_id => $user->id,
+        endpoint => 'http://open311.localhost/',
+        convert_latlong => 1,
+        api_key => 'KEY',
+        jurisdiction => 'test',
+    } );
+
+    my $o = Open311::GetServiceRequests->new();
+
+    my $props = {};
+
+    $o = Test::MockObject::Extends->new($o);
+    $o->mock('create_problems', sub {
+        my $self = shift;
+
+        $props->{convert_latlong} = $self->convert_latlong;
+    } );
+
+    $o->fetch();
+
+    ok $props->{convert_latlong}, "convert latlong set"
+};
+
 sub prepare_xml {
     my $replacements = shift;