diff options
Diffstat (limited to 'perllib')
-rw-r--r-- | perllib/FixMyStreet/Cobrand/FiksGataMi.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/Cobrand/FiksGataMi.pm b/perllib/FixMyStreet/Cobrand/FiksGataMi.pm index 0f8516afc..fd788d892 100644 --- a/perllib/FixMyStreet/Cobrand/FiksGataMi.pm +++ b/perllib/FixMyStreet/Cobrand/FiksGataMi.pm @@ -105,7 +105,7 @@ sub short_name { my $name = $body->{name} || $body->name; if ($name =~ /^(Os|Nes|V\xe5ler|Sande|B\xf8|Her\xf8y)$/) { - my $area_id = $body->body_areas->first->area_id || $body->{id} || $body->id; + my $area_id = $body->{id} || $body->id; my $area = mySociety::MaPit::call('area', $area_id); my $parent = mySociety::MaPit::call('area', $area->{parent_area}); |