From 91ac9486a1fd2eeb65fc9c6d2fccc1b170cfc16f Mon Sep 17 00:00:00 2001 From: Matthew Somerville Date: Mon, 14 Feb 2011 15:40:34 +0000 Subject: Tweaks to OSM map module, fix for truncated co-ords. --- perllib/Utils.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'perllib/Utils.pm') diff --git a/perllib/Utils.pm b/perllib/Utils.pm index 91dab033a..21994d20b 100644 --- a/perllib/Utils.pm +++ b/perllib/Utils.pm @@ -100,7 +100,9 @@ which is < 1m at the equator, if you're using WGS84 lat/lon. sub truncate_coordinate { my $in = shift; - my $out = sprintf( '%0.6f', $in ); + my $out = mySociety::Locale::in_gb_locale { + sprintf( '%0.6f', $in ); + }; $out =~ s{\.?0+\z}{} if $out =~ m{\.}; return $out; } -- cgit v1.2.3