From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Tue, 3 Jul 2007 15:25:25 +0000 (+0000)
Subject: Argh! $form->{storno} nur dann auf '0' setzen, wenn es vorher auch '0' oder 'undef... 
X-Git-Tag: release-2.4.3^2~54
X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/commitdiff_plain/34e473545ff070563e981b4d7090d75d349fd5a5?hp=e7a42f7f4b1d0fd73fbb4fe764c1ec7b41e1800e

Argh! $form->{storno} nur dann auf '0' setzen, wenn es vorher auch '0' oder 'undef' war... Andernfalls geht die gesamte Storno-Verarbeitung in dutten
---

diff --git a/bin/mozilla/is.pl b/bin/mozilla/is.pl
index 9b1d61c90..ea435df7e 100644
--- a/bin/mozilla/is.pl
+++ b/bin/mozilla/is.pl
@@ -1475,9 +1475,9 @@ sub post {
     }
   }
 
-  ($form->{AR})      = split /--/, $form->{AR};
-  ($form->{AR_paid}) = split /--/, $form->{AR_paid};
-  $form->{storno}    = 0;
+  ($form->{AR})        = split /--/, $form->{AR};
+  ($form->{AR_paid})   = split /--/, $form->{AR_paid};
+  $form->{storno}    ||= 0;
 
   $form->{label} = $locale->text('Invoice');