diff options
author | Edmund von der Burg <evdb@mysociety.org> | 2011-02-10 13:27:40 +0000 |
---|---|---|
committer | Edmund von der Burg <evdb@mysociety.org> | 2011-02-10 13:27:40 +0000 |
commit | c694c1a6d394792d75b1db497026a5c42b26e9dd (patch) | |
tree | 27fe3ee925227ce0bb894bc0545eff34a882672a /perllib/FixMyStreet/Map.pm | |
parent | 83b5f08e8441b5b46dc857bfecef7b9102e82f6d (diff) |
Update gode to use en_to_latlon util
Shorter coords in RSS and alert urls
Diffstat (limited to 'perllib/FixMyStreet/Map.pm')
-rw-r--r-- | perllib/FixMyStreet/Map.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/Map.pm b/perllib/FixMyStreet/Map.pm index 0313fbe4f..0902914dd 100644 --- a/perllib/FixMyStreet/Map.pm +++ b/perllib/FixMyStreet/Map.pm @@ -17,6 +17,7 @@ use mySociety::Gaze; use mySociety::GeoUtil qw(national_grid_to_wgs84); use mySociety::Locale; use mySociety::Web qw(ent NewURL); +use Utils; # Run on module boot up load(); @@ -60,7 +61,7 @@ conversion. sub map_features_easting_northing { my ( $q, $easting, $northing, $interval ) = @_; - my ( $lat, $lon ) = national_grid_to_wgs84( $easting, $northing, 'G' ); + my ( $lat, $lon ) = Utils::convert_en_to_latlon( $easting, $northing ); return map_features( $q, $lat, $lon, $interval ); } |