searchOn was not running

environments/ppa-mbqj77/deployments/1
Xavier Guimard 16 years ago
parent 7d4a491af3
commit a9d4ed04bb
  1. 25
      modules/lemonldap-ng-common/lib/Lemonldap/NG/Common/Apache/Session.pm

@ -17,18 +17,21 @@ BEGIN {
sub Apache::Session::searchOn {
my ( $class, $args, $selectField, $value, @fields ) = @_;
my %res = ();
$class->get_key_from_all_sessions($args,sub{
my $entry = shift;
my $id = shift;
return undef unless($entry->{selectField}eq $value);
if (@fields) {
$res{ $id }->{$_} = $entry->{$_} foreach (@fields);
$class->get_key_from_all_sessions(
$args,
sub {
my $entry = shift;
my $id = shift;
return undef unless ( $entry->{$selectField} eq $value );
if (@fields) {
$res{$id}->{$_} = $entry->{$_} foreach (@fields);
}
else {
$res{$id} = $entry;
}
undef;
}
else {
$res{ $id } = $entry;
}
undef;
});
);
return \%res;
}

Loading…
Cancel
Save