Revision 97ca7180
Von Bernd Blessmann vor fast 15 Jahren hinzugefügt
| SL/Auth.pm | ||
|---|---|---|
|
}
|
||
|
}
|
||
|
|
||
|
$main::lxdebug->enter_sub(2);
|
||
|
$main::lxdebug->leave_sub(2);
|
||
|
|
||
|
return $value;
|
||
|
}
|
||
| ... | ... | |
|
pop @stack;
|
||
|
|
||
|
if (!@stack) {
|
||
|
$main::lxdebug->enter_sub(2);
|
||
|
$main::lxdebug->leave_sub(2);
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
| ... | ... | |
|
|
||
|
my $result = ($access || (1 < scalar @stack)) ? 0 : evaluate_rights_ary($stack[0]);
|
||
|
|
||
|
$main::lxdebug->enter_sub(2);
|
||
|
$main::lxdebug->leave_sub(2);
|
||
|
|
||
|
return $result;
|
||
|
}
|
||
Auch abrufbar als: Unified diff
falsche Debug-Meldungen korrigiert.
leave_sub statt enter_sub.