From a2777d1ab70c9789131e9ad966f94a4ddf301bd2 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Sven=20Sch=C3=B6ling?= Date: Mon, 16 Nov 2009 15:22:38 +0100 Subject: [PATCH] =?utf8?q?is.pl:=20unn=C3=B6tige=20parse=5Famounts?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Sorgen dafür dass sich creditlimit etc. beim update multipliziert. --- bin/mozilla/is.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/bin/mozilla/is.pl b/bin/mozilla/is.pl index b1aa9f3c5..4b8b8175d 100644 --- a/bin/mozilla/is.pl +++ b/bin/mozilla/is.pl @@ -455,7 +455,7 @@ sub update { my ($recursive_call) = shift; - map { $form->{$_} = $form->parse_amount(\%myconfig, $form->{$_}) } qw(exchangerate creditlimit creditremaining) unless $recursive_call; +# map { $form->{$_} = $form->parse_amount(\%myconfig, $form->{$_}) } qw(exchangerate creditlimit creditremaining) unless $recursive_call; $form->{print_and_post} = 0 if $form->{second_run}; my $taxincluded = "checked" if $form->{taxincluded}; @@ -876,8 +876,8 @@ sub credit_note { map { $form->{"select$_"} = "" } ($form->{vc}, 'currency'); - map { $form->{$_} = $form->parse_amount(\%myconfig, $form->{$_}) } - qw(creditlimit creditremaining); +# map { $form->{$_} = $form->parse_amount(\%myconfig, $form->{$_}) } +# qw(creditlimit creditremaining); my $currency = $form->{currency}; &invoice_links; -- 2.20.1