Revision 5b22b6b5
Von Moritz Bunkus vor fast 17 Jahren hinzugefügt
bin/mozilla/io.pl | ||
---|---|---|
607 | 607 |
my $previousform = join '&', map { $form->{$_} =~ s/&/%26/; "$_=$form->{$_}" } grep { !/action/ } keys %$form; |
608 | 608 |
|
609 | 609 |
push @HIDDENS, { 'name' => 'previousform', 'value' => $form->escape($previousform, 1) }; |
610 |
push @HIDDENS, map +{ 'name' => $_, 'value' => $form->{$_} }, qw(rowcount vc login password);
|
|
610 |
push @HIDDENS, map +{ 'name' => $_, 'value' => $form->{$_} }, qw(rowcount vc); |
|
611 | 611 |
push @HIDDENS, map +{ 'name' => $_, 'value' => $form->{"${_}_$form->{rowcount}"} }, qw(partnumber description unit sellprice); |
612 | 612 |
push @HIDDENS, { 'name' => 'taxaccount2', 'value' => $form->{taxaccounts} }; |
613 |
next if (($key eq 'login') || ($key eq 'password') || ('' ne ref $form->{$key})); |
|
614 | 613 |
|
615 | 614 |
$form->header(); |
616 | 615 |
print $form->parse_html_template("generic/new_item", { HIDDENS => [ sort { $a->{name} cmp $b->{name} } @HIDDENS ] } ); |
Auch abrufbar als: Unified diff
Die Variablen login und password müssen/dürfen seit der Umstellung auf Session basierte Authentifizierung nicht mehr übergeben werden.