X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/8a40e3dd0f638557b8c666fe708ccbc1ac709c4e..e28d95b4826728e7490d708b40b2514b2fe88a34:/SL/Menu.pm diff --git a/SL/Menu.pm b/SL/Menu.pm index 57d8b4e8a..0fb1b1a95 100644 --- a/SL/Menu.pm +++ b/SL/Menu.pm @@ -94,7 +94,7 @@ sub access_control { my @menu = (); - if ($menulevel eq "") { + if (!$menulevel) { @menu = grep { !/--/ } @{ $self->{ORDER} }; } else { @menu = grep { /^${menulevel}--/ } @{ $self->{ORDER} };