diff options
author | Matthew Somerville <matthew@fury.ukcod.org.uk> | 2011-02-17 01:02:46 +0000 |
---|---|---|
committer | Matthew Somerville <matthew@fury.ukcod.org.uk> | 2011-02-17 01:02:46 +0000 |
commit | 3033514eec2a30d43797c42eeb175fa9da9aeef1 (patch) | |
tree | c68a775bdbdd6789aea2290c629dd0e145dab31e /perllib/FixMyStreet/Map/OSM.pm | |
parent | 2699b760e4b08b1422ab8232af4081f75627588e (diff) |
Display pins.
Diffstat (limited to 'perllib/FixMyStreet/Map/OSM.pm')
-rw-r--r-- | perllib/FixMyStreet/Map/OSM.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/Map/OSM.pm b/perllib/FixMyStreet/Map/OSM.pm index 0db09b928..820a4ce63 100644 --- a/perllib/FixMyStreet/Map/OSM.pm +++ b/perllib/FixMyStreet/Map/OSM.pm @@ -32,7 +32,8 @@ sub display_map { my @pins; foreach my $pin (@{$params{pins}}) { - push @pins, "[ $pin->[0], $pin->[1], '$pin->[2]' ]"; + $pin->[3] ||= ''; + push @pins, "[ $pin->[0], $pin->[1], '$pin->[2]', '$pin->[3]' ]"; } my $pins = join(",\n", @pins); |