From ef255c4ee60cda3b3f69ecdaef0a09a67194ac27 Mon Sep 17 00:00:00 2001
From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Wed, 13 Dec 2006 16:31:36 +0000
Subject: [PATCH] =?utf8?q?Keine=20globalen=20Variablen=20=C3=BCberschreibe?=
 =?utf8?q?n/benutzen.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 bin/mozilla/ir.pl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/bin/mozilla/ir.pl b/bin/mozilla/ir.pl
index 3bfcbf620..1f7d34682 100644
--- a/bin/mozilla/ir.pl
+++ b/bin/mozilla/ir.pl
@@ -189,6 +189,7 @@ sub prepare_invoice {
 
     map { $form->{$_} =~ s/\"/&quot;/g } qw(invnumber ordnumber quonumber);
 
+    my $i = 0;
     foreach $ref (@{ $form->{invoice_details} }) {
       $i++;
       map { $form->{"${_}_$i"} = $ref->{$_} } keys %{$ref};
-- 
2.20.1