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|