From 1c1d2aee0523ef311eff96040ab2cfc4ca6235b6 Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Fri, 2 Feb 2007 16:07:50 +0000 Subject: [PATCH] =?utf8?q?Kleiner=20Bug=20beim=20Reformatieren=20von=20Zah?= =?utf8?q?len=20f=C3=BCr=20die=20Zahlungsbedingungen.?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- SL/Form.pm | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) diff --git a/SL/Form.pm b/SL/Form.pm index 90b7d3d2f..57bd84beb 100644 --- a/SL/Form.pm +++ b/SL/Form.pm @@ -1149,11 +1149,11 @@ sub set_payment_options { selectrow_query($self, $dbh, $query); my $total = ($self->{invtotal}) ? $self->{invtotal} : $self->{ordtotal}; + my $skonto_amount = $self->parse_amount($myconfig, $total) * + $self->{percent_skonto}; $self->{skonto_amount} = - $self->format_amount($myconfig, - $self->parse_amount($myconfig, $total) * - $self->{percent_skonto}, 2); + $self->format_amount($myconfig, $skonto_amount, 2); if ($self->{"language_id"}) { $query = @@ -1183,9 +1183,7 @@ sub set_payment_options { my $saved_numberformat = $myconfig->{"numberformat"}; $myconfig->{"numberformat"} = $output_numberformat; $self->{skonto_amount} = - $self->format_amount($myconfig, - $self->parse_amount($myconfig, $total) * - $self->{percent_skonto}, 2); + $self->format_amount($myconfig, $skonto_amount, 2); $myconfig->{"numberformat"} = $saved_numberformat; } } -- 2.20.1