diff options
Diffstat (limited to 'perllib/FixMyStreet/Map')
| -rw-r--r-- | perllib/FixMyStreet/Map/Bromley.pm | 4 | ||||
| -rw-r--r-- | perllib/FixMyStreet/Map/FMS.pm | 10 |
2 files changed, 7 insertions, 7 deletions
diff --git a/perllib/FixMyStreet/Map/Bromley.pm b/perllib/FixMyStreet/Map/Bromley.pm index 836efed39..4f4c2fae8 100644 --- a/perllib/FixMyStreet/Map/Bromley.pm +++ b/perllib/FixMyStreet/Map/Bromley.pm @@ -12,11 +12,11 @@ use base 'FixMyStreet::Map::FMS'; use strict; sub map_type { - return '"/tilma"'; + return '"https://{S}-fix.bromley.gov.uk/tilma"'; } sub map_tile_base { - "/tilma/%d/%d/%d.png"; + '-', "https://%sfix.bromley.gov.uk/tilma/%d/%d/%d.png"; } 1; 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 { |