warnings
authorSven Schöling <s.schoeling@linet-services.de>
Fri, 1 Feb 2013 13:25:45 +0000 (14:25 +0100)
committerSven Schöling <s.schoeling@linet-services.de>
Fri, 1 Feb 2013 13:25:45 +0000 (14:25 +0100)
SL/Menu.pm

index 57d8b4e..0fb1b1a 100644 (file)
@@ -94,7 +94,7 @@ sub access_control {
 
   my @menu = ();
 
-  if ($menulevel eq "") {
+  if (!$menulevel) {
     @menu = grep { !/--/ } @{ $self->{ORDER} };
   } else {
     @menu = grep { /^${menulevel}--/ } @{ $self->{ORDER} };