From: Sven Schöling <s.schoeling@linet-services.de>
Date: Mon, 5 Dec 2011 11:13:10 +0000 (+0100)
Subject: Strictfehler in cp.pl korrigiert.
X-Git-Tag: release-2.7.0beta1~145
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=c87ba417b940d5a42653f10654310ce40eafe87a;p=kivitendo-erp.git

Strictfehler in cp.pl korrigiert.
---

diff --git a/bin/mozilla/cp.pl b/bin/mozilla/cp.pl
index c6910ba85..ee4918131 100644
--- a/bin/mozilla/cp.pl
+++ b/bin/mozilla/cp.pl
@@ -442,10 +442,10 @@ sub check_form {
     if ($form->parse_amount(\%myconfig, $form->{"paid_$i"})) {
       $amount -= $form->parse_amount(\%myconfig, $form->{"paid_$i"});
 
-      push(@{ $form->{paid} },      $form->{"paid_$i"});
-      push(@{ $form->{due} },       $form->{"due_$i"});
-      push(@{ $form->{invnumber} }, $form->{"invnumber_$i"});
-      push(@{ $form->{invdate} },   $form->{"transdate_$i"});
+      push(@{ $form->{paid}      ||= [] }, $form->{"paid_$i"});
+      push(@{ $form->{due}       ||= [] }, $form->{"due_$i"});
+      push(@{ $form->{invnumber} ||= [] }, $form->{"invnumber_$i"});
+      push(@{ $form->{invdate}   ||= [] }, $form->{"transdate_$i"});
     }
   }