Schreibfehler in Variable.
authorMoritz Bunkus <m.bunkus@linet-services.de>
Fri, 18 May 2007 08:34:45 +0000 (08:34 +0000)
committerMoritz Bunkus <m.bunkus@linet-services.de>
Fri, 18 May 2007 08:34:45 +0000 (08:34 +0000)
bin/mozilla/io.pl

index 49b1494..86c93d0 100644 (file)
@@ -647,11 +647,11 @@ sub select_item {
     my @new_fields =
       qw(bin listprice inventory_accno income_accno expense_accno unit weight
          assembly taxaccounts partsgroup formel logdescription not_discountable
-         part_payment_id partnodes id);
+         part_payment_id partnotes id);
     push(@new_fields, "lizenzen") if ($lizenzen);
 
-    map({ print($cgi->hidden("-name" => "new_${_}_$i",
-                             "-value" => $ref->{$_})); } @new_fields);
+    print join "\n", map { $cgi->hidden("-name" => "new_${_}_$i", "-value" => $ref->{$_}) } @new_fields;
+    print "\n";
   }
 
   print qq|