old Number::Format silently ignores datavolume-forcemegabytes
[freeside.git] / FS / FS / UI / bytecount.pm
index 233082b..38aa1df 100644 (file)
@@ -3,7 +3,7 @@ package FS::UI::bytecount;
 use strict;
 use vars qw($DEBUG $me);
 use FS::Conf;
-use Number::Format;
+use Number::Format 1.50;
 
 $DEBUG = 0;
 $me = '[FS::UID::bytecount]';
@@ -70,7 +70,8 @@ sub display_bytecount {
   return $bc unless ($bc =~ /^(\d+)$/);
   my $conf = new FS::Conf;
   my $f = new Number::Format;
-  my $precision = $conf->exists('datavolume-significantdigits')
+  my $precision = ( $conf->exists('datavolume-significantdigits') &&
+                    $conf->config('datavolume-significantdigits') =~ /^\s*\d+\s*$/ )
                 ? $conf->config('datavolume-significantdigits')
                 : 3;
   my $unit = $conf->exists('datavolume-forcemegabytes') ? 'M' : 'A';