diff options
| -rw-r--r-- | lib/Math/Decimal/FastPP.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Math/Decimal/FastPP.pm b/lib/Math/Decimal/FastPP.pm index 0f9960d..8db00a9 100644 --- a/lib/Math/Decimal/FastPP.pm +++ b/lib/Math/Decimal/FastPP.pm @@ -93,9 +93,9 @@ sub dfmt ($s, $i, $f) = $a =~ m/^(-?)(\d*).?(\d*)$/; $l = length($f); - if ($i eq "") { $i = "0"; } - if ($l < $p) { $f .= "0" x ($p - $l); } - return $s . $i . "." . $f; + if ($i eq '') { $i = '0'; } + if ($l < $p) { $f .= '0' x ($p - $l); } + return $s . $i . '.' . $f; } 1; |