X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=SL%2FAuth.pm;h=9301796032f502567d5d0a44a9ba0fa0d8855208;hb=5d1790289c565ace01143d524538bd505859a57c;hp=2898222aa64ae8a8745a45c2625b25878ee6cc2d;hpb=48c71a4b51f5359a7ab7e9bc51280baf9bc9b9b2;p=kivitendo-erp.git diff --git a/SL/Auth.pm b/SL/Auth.pm index 2898222aa..930179603 100644 --- a/SL/Auth.pm +++ b/SL/Auth.pm @@ -1126,6 +1126,8 @@ sub evaluate_rights_ary { my $negate = 0; foreach my $el (@{$ary}) { + next unless defined $el; + if (ref $el eq "ARRAY") { my $val = evaluate_rights_ary($el); $val = !$val if $negate;