Keine globalen Variablen benutzen/überschreiben. Fix für Bugzilla #450.
authorMoritz Bunkus <m.bunkus@linet-services.de>
Wed, 13 Dec 2006 16:29:52 +0000 (16:29 +0000)
committerMoritz Bunkus <m.bunkus@linet-services.de>
Wed, 13 Dec 2006 16:29:52 +0000 (16:29 +0000)
bin/mozilla/is.pl

index df3062f..1be623f 100644 (file)
@@ -261,10 +261,11 @@ sub prepare_invoice {
     #     # get pricegroups for parts
     #     IS->get_pricegroups_for_parts(\%myconfig, \%$form);
 
+    my $i = 0;
+
     foreach $ref (@{ $form->{invoice_details} }) {
       $i++;
 
       map { $form->{"${_}_$i"} = $ref->{$_} } keys %{$ref};
       $form->{"discount_$i"} =
         $form->format_amount(\%myconfig, $form->{"discount_$i"} * 100);