# NOTE: Derived from lib/Apache/Session/Browseable/_common.pm.
# Changes made here will be lost when autosplit is run again.
# See AutoSplit.pm.
package Apache::Session::Browseable::_common;

#line 31 "lib/Apache/Session/Browseable/_common.pm (autosplit into blib/lib/auto/Apache/Session/Browseable/_common/searchOn.al)"
sub searchOn {
    my ( $class, $args, $selectField, $value, @fields ) = splice @_;
    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);
            }
            else {
                $res{$id} = $entry;
            }
            undef;
        }
    );
    return \%res;
}

# end of Apache::Session::Browseable::_common::searchOn
1;