X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/6ac47be4e3e318ea212ca595195b0b55a9c386a3..ab36799f821da4080a2d53654b36521a03240018:/SL/Layout/V3.pm diff --git a/SL/Layout/V3.pm b/SL/Layout/V3.pm index f37eea49c..3d0b2c03f 100644 --- a/SL/Layout/V3.pm +++ b/SL/Layout/V3.pm @@ -98,13 +98,13 @@ sub menuitem_v3 { return $str . $menuitem->{href} . '">'; } - $str .= qq|$module?action=| . $::form->escape($action) . qq|&level=| . $::form->escape($level); + $str .= qq|$module?action=| . $::form->escape($action); map { delete $menuitem->{$_} } qw(module action target href); # add other params foreach my $key (keys %{ $menuitem }) { - $str .= "&" . $::form->escape($key, 1) . "="; + $str .= "&" . $::form->escape($key, 1) . "="; my ($value, $conf) = split(/=/, $menuitem->{$key}, 2); $value = $::myconfig{$value} . "/$conf" if ($conf); $str .= $::form->escape($value, 1);