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

"_safe" instead of "safe" in Menu

Browse Source
This commit is contained in:
Xavier Guimard 2010-09-06 09:23:23 +00:00
parent b5361c1175
commit c8a2b8c5e0
2 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -154,10 +154,10 @@ sub displayModule {
$cond =~ s/\$(\w+)/$self->{portalObject}->{sessionInfo}->{$1}/g; $cond =~ s/\$(\w+)/$self->{portalObject}->{sessionInfo}->{$1}/g;
return ( return (
SAFEWRAP SAFEWRAP
? $self->safe->wrap_code_ref( ? $self->_safe->wrap_code_ref(
$self->safe->reval("sub{return($cond)}") $self->_safe->reval("sub{return($cond)}")
) )
: $self->safe->reval("sub{return($cond)}") : $self->_safe->reval("sub{return($cond)}")
); );
} }
@ -573,8 +573,8 @@ sub _conditionSub {
my $sub = "sub {my \$self = shift; return ( $cond )}"; my $sub = "sub {my \$self = shift; return ( $cond )}";
$sub = ( $sub = (
SAFEWRAP SAFEWRAP
? $self->safe->wrap_code_ref( $self->safe->reval($sub) ) ? $self->_safe->wrap_code_ref( $self->_safe->reval($sub) )
: $self->safe->reval($sub) : $self->_safe->reval($sub)
); );
return $sub; return $sub;
} }

3
modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Simple.pm
View File

@ -474,6 +474,9 @@ sub new {
. ')'; . ')';
} }
# Other
$self->{logoutServices} ||= {};
return $self; return $self;
} }