X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/fb95b3539d85862567c4f192d9201e0806844435..8660390cf291a037ce540f0c3372e6f213938e50:/SL/Layout/V3.pm diff --git a/SL/Layout/V3.pm b/SL/Layout/V3.pm index 713764f60..a59424001 100644 --- a/SL/Layout/V3.pm +++ b/SL/Layout/V3.pm @@ -87,18 +87,20 @@ sub menuitem_v3 { $action = $menuitem->{action}; } - my $level = $::form->escape($item); + my $level = $::form->escape($item); - my $str = qq|escape($menuitem->{target}) . '"' : ''; + my $str = qq|{href}|; - @vars = qw(module target href); + $main::lxdebug->leave_sub(); + return $str . $menuitem->{href} . '">'; } - map { delete $menuitem->{$_} } @vars; + $str .= qq|$module?action=| . $::form->escape($action) . qq|&level=| . $::form->escape($level); + + map { delete $menuitem->{$_} } qw(module action target href); # add other params foreach my $key (keys %{ $menuitem }) {