X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/515987f01b78c68de36f5d700dad805816955b45..d83df93a4dc08d7ecb9047c176b610a5b9cc28ed:/bin/mozilla/io.pl
diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index f783c19c0..afa4d2341 100644
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -871,12 +871,11 @@ sub new_item {
. $locale->text('Part') . qq|
|
. $locale->text('Service');
-print $cgi->hidden("-name" => "previousform", "-value" => $previousform);
-map({ print($cgi->hidden("-name" => $_, "-value" => $form->{$_})); }
- qw(rowcount vc login password));
- map({ print($cgi->hidden("-name" => $_, "-value" => $form->{"$__$i"})); }
- ("partnumber", "description"));
-print $cgi->hidden("-name" => "taxaccount2", "-value" => $form->{taxaccounts});
+
+ print $cgi->hidden("-name" => "previousform", "-value" => $previousform);
+ map { print $cgi->hidden("-name" => $_, "-value" => $form->{$_}); } qw(rowcount vc login password);
+ map { print $cgi->hidden("-name" => $_, "-value" => $form->{"${_}_$i"}); } qw(partnumber description unit sellprice);
+ print $cgi->hidden("-name" => "taxaccount2", "-value" => $form->{taxaccounts});
print qq|