X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/bb99760f9239bca52db6f4496bdb7aaa9055fbf7..6277aefffea29c8aa6f684bd86c55cdc6366f32f:/bin/mozilla/cp.pl diff --git a/bin/mozilla/cp.pl b/bin/mozilla/cp.pl index ce4174742..8e31a8f1a 100644 --- a/bin/mozilla/cp.pl +++ b/bin/mozilla/cp.pl @@ -483,14 +483,7 @@ sub form_footer { print qq| -|; - - if ($form->{menubar}) { - require "$form->{path}/menu.pl"; - &menubar; - } - print qq| @@ -762,7 +755,7 @@ sub check_form { $form->{amount} = $amount; for $i (1 .. $form->{rowcount}) { - if ($form->{"paid_$i"}) { + if ($form->parse_amount(\%myconfig, $form->{"paid_$i"})) { $amount -= $form->parse_amount($myconfig, $form->{"paid_$i"}); push(@{ $form->{paid} }, $form->{"paid_$i"});