diff options
Diffstat (limited to 'perllib/FixMyStreet/Map/FMS.pm')
-rw-r--r-- | perllib/FixMyStreet/Map/FMS.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/perllib/FixMyStreet/Map/FMS.pm b/perllib/FixMyStreet/Map/FMS.pm index 4d0af983b..b1dd29002 100644 --- a/perllib/FixMyStreet/Map/FMS.pm +++ b/perllib/FixMyStreet/Map/FMS.pm @@ -38,17 +38,17 @@ sub get_quadkey { } sub map_tile_base { - "http://%stilma.mysociety.org/sv/%d/%d/%d.png"; + '.', "http://%stilma.mysociety.org/sv/%d/%d/%d.png"; } sub map_tiles { my ($self, $x, $y, $z) = @_; if ($z >= 16) { - my $tile_base = $self->map_tile_base; + my ($tile_sep, $tile_base) = $self->map_tile_base; return [ - sprintf($tile_base, 'a.', $z, $x-1, $y-1), - sprintf($tile_base, 'b.', $z, $x, $y-1), - sprintf($tile_base, 'c.', $z, $x-1, $y), + sprintf($tile_base, 'a' . $tile_sep, $z, $x-1, $y-1), + sprintf($tile_base, 'b' . $tile_sep, $z, $x, $y-1), + sprintf($tile_base, 'c' . $tile_sep, $z, $x-1, $y), sprintf($tile_base, '', $z, $x, $y), ]; } else { |