X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FMenu.pm;h=42b08de48004d2fd4d6604351764930708c402ae;hb=b611e9e6e77f845f8b8ded6eb5303a0a6bf83ae8;hp=0e92cc5b3d75b9ee6f094e0fc2bf286d8ba72c2c;hpb=37df271bea8bf485f36b3de420b6ae9e02d33f7a;p=kivitendo-erp.git diff --git a/SL/Menu.pm b/SL/Menu.pm index 0e92cc5b3..42b08de48 100644 --- a/SL/Menu.pm +++ b/SL/Menu.pm @@ -180,7 +180,7 @@ sub parse_access_string { my $access = $node->{access}; - while ($access =~ m/^([a-z_\/]+|\||\&|\(|\)|\s+)/) { + while ($access =~ m/^([a-z_\/]+|\!|\||\&|\(|\)|\s+)/) { my $token = $1; substr($access, 0, length($1)) = ""; @@ -199,7 +199,7 @@ sub parse_access_string { } $cur_ary = $stack[-1]; - } elsif (($token eq "|") || ($token eq "&")) { + } elsif (($token eq "|") || ($token eq "&") || ($token eq "!")) { push @{$cur_ary}, $token; } else { @@ -273,4 +273,3 @@ sub set_access { } 1; -