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;
return (
SAFEWRAP
? $self->safe->wrap_code_ref(
$self->safe->reval("sub{return($cond)}")
? $self->_safe->wrap_code_ref(
$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 )}";
$sub = (
SAFEWRAP
? $self->safe->wrap_code_ref( $self->safe->reval($sub) )
: $self->safe->reval($sub)
? $self->_safe->wrap_code_ref( $self->_safe->reval($sub) )
: $self->_safe->reval($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;
}