X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/52ee8da657d1d16b350d8b386a10d5f84b388204..7e6d7935ef67bfb97d4aa8b6fb44b26e9a3d3e04:/SL/Form.pm

diff --git a/SL/Form.pm b/SL/Form.pm
index 7e5c8736d..5a9272465 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -1392,7 +1392,10 @@ sub set_payment_options {
   $amounts{invtotal_wo_skonto} = $amounts{invtotal} * (1 - $self->{percent_skonto});
   $amounts{total_wo_skonto}    = $amounts{total}    * (1 - $self->{percent_skonto});
 
-  map { $formatted_amounts{$_} = $self->format_amount($myconfig, $amounts{$_}, 2) } keys %amounts;
+  foreach (keys %amounts) {
+    $amounts{$_}           = $self->round_amount($amounts{$_}, 2);
+    $formatted_amounts{$_} = $self->format_amount($myconfig, $amounts{$_}, 2);
+  }
 
   if ($self->{"language_id"}) {
     $query =