aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/Utils.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perllib/Utils.pm')
-rw-r--r--perllib/Utils.pm4
1 files changed, 3 insertions, 1 deletions
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;
}