X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/181ce4f5bab35c1f270a192f062cd27cd34060ba..eabb0fd8c765a8d27c93a35f6092d2bc04348e8d:/SL/Menu.pm diff --git a/SL/Menu.pm b/SL/Menu.pm index 77bc848fd..89a6ffd15 100644 --- a/SL/Menu.pm +++ b/SL/Menu.pm @@ -34,13 +34,17 @@ package Menu; +use SL::Inifile; + sub new { $main::lxdebug->enter_sub(); - my ($type, $menufile, $level) = @_; + my ($type, $menufile) = @_; + + my $self = {}; + my $inifile = Inifile->new($menufile); - use SL::Inifile; - my $self = Inifile->new($menufile, $level); + map { $self->{$_} = $inifile->{$_} } keys %{ $inifile }; $main::lxdebug->leave_sub(); @@ -69,7 +73,7 @@ sub menuitem { my $level = $form->escape($item); my $str = - qq|{path}&action=$action&level=$level&login=$form->{login}&password=$form->{password}|; + qq|{login}&password=$form->{password}|; my @vars = qw(module action target href); @@ -122,7 +126,7 @@ sub menuitem_v3 { my $str = qq|