Always initialize groups and hGroups (Fixes: #2476)

This commit is contained in:
Yadd 2022-02-05 10:21:32 +01:00
parent 398f729da9
commit 7b71a0c764
2 changed files with 4 additions and 2 deletions

View File

@ -505,6 +505,8 @@ sub setPersistentSessionInfo {
sub setLocalGroups {
my ( $self, $req ) = @_;
$req->{sessionInfo}->{groups} //= '';
$req->{sessionInfo}->{hGroups} //= {};
foreach ( sort keys %{ $self->_groups } ) {
if ( $self->_groups->{$_}->( $req, $req->sessionInfo ) ) {
$req->{sessionInfo}->{groups} .=

View File

@ -58,8 +58,8 @@ sub setSessionInfo {
# @return Lemonldap::NG::Portal constant
sub setGroups {
my ( $self, $req ) = @_;
my $groups = $req->{sessionInfo}->{groups};
my $hGroups = $req->{sessionInfo}->{hGroups};
my $groups = $req->{sessionInfo}->{groups} || '';
my $hGroups = $req->{sessionInfo}->{hGroups} || {};
if ( $self->conf->{ldapGroupBase} ) {