X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/ac0c6a8692e05549cb2dc0a60e692f550fa72894..f27a8a8ff5f1949aaee43f1df987ca3d05ba5eba:/SL/Form.pm

diff --git a/SL/Form.pm b/SL/Form.pm
index 44d857c86..b63e633ab 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -147,7 +147,7 @@ sub new {
   $self->{action} = lc $self->{action};
   $self->{action} =~ s/( |-|,|\#)/_/g;
 
-  $self->{version}   = "2.4.1";
+  $self->{version}   = "2.4.2";
 
   $main::lxdebug->leave_sub();
 
@@ -653,7 +653,7 @@ sub format_amount {
   }
   my $neg = ($amount =~ s/-//);
 
-  if (defined($places)) {
+  if (defined($places) && ($places ne '')) {
     if ($places < 0) {
       $amount *= 1;
       $places *= -1;