do not fall over if there is unexpectedly no meta data for a service code

1 files changed, 13 insertions, 0 deletions

diff --git a/t/open311/populate-service-list.t b/t/open311/populate-service-list.t
index 5910a8f13..00026cd9f 100644
--- a/t/open311/populate-service-list.t
+++ b/t/open311/populate-service-list.t
@@ -372,6 +372,19 @@ for my $test (
     </service_definition>
         ',
     },
+    {
+        desc => 'check empty meta data handled',
+        has_meta => 1,
+        orig_meta => undef,
+        end_meta => undef,
+        meta_xml => '<?xml version="1.0" encoding="utf-8"?>
+    <service_definition>
+        <service_code>100</service_code>
+        <attributes>
+        </attributes>
+    </service_definition>
+        ',
+    },
 ) {
     subtest $test->{desc} => sub {
         my $processor = Open311::PopulateServiceList->new( council_list => [] );