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

Fix #2498

Browse Source
This commit is contained in:
Maxime Besson 2021-03-30 12:07:09 +02:00
parent dca8483ec5
commit b4f5ee58c3
1 changed files with 11 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
lemonldap-ng-common/scripts/convertSessions
View File

@ -128,6 +128,17 @@ Lemonldap::NG::Common::Apache::Session->get_key_from_all_sessions(
my $entry = shift;
my $id = shift;
# If filtering sessionKind
if (@sessionKindOnly) {
unless ( grep { $_ eq $entry->{_session_kind} } @sessionKindOnly ) {
print "Ignoring session $id with type "
. $entry->{_session_kind} . "\n"
if $debug;
return undef;
}
}
print "Processing session $id\n" if $debug;
my $s = Lemonldap::NG::Common::Session->new( {
storageModule => $backendTo->{backend},
@ -138,14 +149,6 @@ Lemonldap::NG::Common::Apache::Session->get_key_from_all_sessions(
}
);
# If filtering sessionKind
if (@sessionKindOnly) {
unless ( grep { $_ eq $entry->{_session_kind} } @sessionKindOnly ) {
return undef;
}
}
if ( $s->error ) {
die "Error encountered on session $id" unless $ignore_errors;
$nb_error += 1;