## @file # UserDB chaining mechanism ## @class # UserDB chaining mechanism package Lemonldap::NG::Portal::UserDBMulti; use Lemonldap::NG::Portal::_Multi; #inherits our $VERSION = '2.0.0'; sub userDBInit { my $self = shift; return $self->_multi->try( 'userDBInit', 1 ); } sub getUser { my $self = shift; return $self->_multi->try( 'getUser', 1 ); } sub setSessionInfo { my $self = shift; $self->{sessionInfo}->{_userDBMulti} = $self->{_multi}->{stack}->[1]->[0]->{n}; return $self->_multi->try( 'setSessionInfo', 1 ); } sub setGroups { my $self = shift; return $self->_multi->try( 'setGroups', 1 ); } sub userDBFinish { my $self = shift; return $self->_multi->try( 'userDBFinish', 1 ); } 1;