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

Compute macros and local groups in alphabetical order (#596)

Browse Source
This commit is contained in:
François-Xavier Deltombe 2013-05-21 08:18:03 +00:00
parent 355dcff030
commit 3909d708d1
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -2061,8 +2061,8 @@ sub setSessionInfo {
#@return Lemonldap::NG::Portal constant
sub setMacros {
my $self = shift;
while ( my ( $n, $e ) = each( %{ $self->{macros} } ) ) {
$self->{sessionInfo}->{$n} = $self->safe->reval($e);
foreach (sort keys %{ $self->{macros} }) {
$self->{sessionInfo}->{$_} = $self->safe->reval( $self->{macros}->{$_} );
}
PE_OK;
}
@ -2074,9 +2074,9 @@ sub setMacros {
sub setLocalGroups {
my $self = shift;
my $groups = "";
while ( my ( $group, $expr ) = each %{ $self->{groups} } ) {
$groups .= $group . $self->{multiValuesSeparator}
if ( $self->safe->reval($expr) );
foreach (sort keys %{ $self->{groups} } ) {
$groups .= $_ . $self->{multiValuesSeparator}
if ( $self->safe->reval( $self->{groups}->{$_} ) );
}
# Join local and UserDB groups