# HG changeset patch # User Dominic Cleal # Date 1232919219 0 # Node ID 783d0f95492741f8723e3f95774998bc7b0a237a # Parent e9429d4a7942c3f87d17961871fbff72b227c64f Rounding numbers off, not 2dp diff -r e9429d4a7942 -r 783d0f954927 reproctool.cgi --- a/reproctool.cgi Sun Jan 25 21:31:30 2009 +0000 +++ b/reproctool.cgi Sun Jan 25 21:33:39 2009 +0000 @@ -305,7 +305,7 @@ sub pretty_numbers { my $num = shift; - $num = sprintf('%.2f', $num); + $num = int($num); $num = reverse $num; $num =~ s/(\d\d\d)(?=\d)(?!\d*\.)/$1,/g; return reverse $num;