X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/0f988add03549dbb11f12e0e3c6ab8fcbcdea911..fcc1d512a5e2cd9db53702fea9ef83684aa0f2f3:/SL/Form.pm

diff --git a/SL/Form.pm b/SL/Form.pm
index 70d3a6550..2f4283359 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -871,6 +871,8 @@ sub format_amount {
     $amount = 0;
   }
 
+  $amount *= 1;
+
   # Hey watch out! The amount can be an exponential term like 1.13686837721616e-13
 
   my $neg = ($amount =~ s/^-//);