diff options
Diffstat (limited to 'perllib/FixMyStreet/Map/Tilma/Original.pm')
| -rw-r--r-- | perllib/FixMyStreet/Map/Tilma/Original.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perllib/FixMyStreet/Map/Tilma/Original.pm b/perllib/FixMyStreet/Map/Tilma/Original.pm index 5f5a102ac..81b123b30 100644 --- a/perllib/FixMyStreet/Map/Tilma/Original.pm +++ b/perllib/FixMyStreet/Map/Tilma/Original.pm @@ -13,7 +13,8 @@ use LWP::Simple; use Cobrand; use mySociety::Web qw(ent NewURL); -use mySociety::GeoUtil qw(national_grid_to_wgs84); +use mySociety::GeoUtil; +use Utils; sub _ll_to_en { my ($lat, $lon) = @_; @@ -239,7 +240,7 @@ sub tile_xy_to_wgs84 { my $easting = tile_to_os($x); my $northing = tile_to_os($y); - my ( $lat, $lon ) = national_grid_to_wgs84( $easting, $northing, 'G' ); + my ( $lat, $lon ) = Utils::convert_en_to_latlon( $easting, $northing ); return ( $lat, $lon ); } |