Argh! $form->{storno} nur dann auf '0' setzen, wenn es vorher auch '0' oder 'undef...

diff --git a/bin/mozilla/is.pl b/bin/mozilla/is.pl
index 9b1d61c..ea435df 100644 (file)
--- 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');