dani/lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

LEMONLDAP::NG : one more bug...

Browse Source
This commit is contained in:
Xavier Guimard 2008-11-17 15:12:17 +00:00
parent e1ff8a6d46
commit dd0c815795
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
modules/lemonldap-ng-handler/lib/Lemonldap/NG/Handler/Simple.pm
View File

@ -270,7 +270,7 @@ sub safe {
$safe->share( '&encode_base64', '$datas', '&lmSetHeaderIn', '$apacheRequest', @t );
foreach(@t) {
$class->lmLog("Custom function : $_",'debug');
my $sub = "$class\::$_" unless(/::/);
my $sub = /::/ ? $_ : "$class\::$_";
eval "sub $_ {
return $sub(\$apacheRequest->uri
. ( \$apacheRequest->args ? '?' . \$apacheRequest->args : '' )

2
modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Menu.pm
View File

@ -24,7 +24,7 @@ sub _safe {
my @t = split /\s+/, $self->{customFunctions};
foreach(@t) {
next if(__PACKAGE__->can($_));
my $sub = "$self->{caller}::$_" unless(/::/);
my $sub = /::/ ? $_ : "$self->{caller}::$_";
eval "sub $_ {
return $sub(\$path,\@_);
}";