Sort functions & append comments
This commit is contained in:
parent
13378c3150
commit
52fa94bd55
|
@ -98,16 +98,14 @@ sub init {
|
|||
|
||||
# Each first method must call getStack() to get the auth scheme available for
|
||||
# the current user
|
||||
|
||||
## Auth steps
|
||||
#############
|
||||
sub extractFormInfo {
|
||||
my ( $self, $req ) = @_;
|
||||
return $self->try( 0, 'extractFormInfo', $req );
|
||||
}
|
||||
|
||||
# Note that UserDB::Combination uses the same object.
|
||||
sub getUser {
|
||||
return $_[0]->try( 1, 'getUser', $_[1] );
|
||||
}
|
||||
|
||||
sub authenticate {
|
||||
return $_[0]->try( 0, 'authenticate', $_[1] );
|
||||
}
|
||||
|
@ -116,14 +114,6 @@ sub setAuthSessionInfo {
|
|||
return $_[0]->try( 0, 'setAuthSessionInfo', $_[1] );
|
||||
}
|
||||
|
||||
sub setSessionInfo {
|
||||
return $_[0]->try( 1, 'setSessionInfo', $_[1] );
|
||||
}
|
||||
|
||||
sub setGroups {
|
||||
return $_[0]->try( 1, 'setGroups', $_[1] );
|
||||
}
|
||||
|
||||
sub getDisplayType {
|
||||
my ( $self, $req ) = @_;
|
||||
return $self->conf->{combinationForms}
|
||||
|
@ -157,6 +147,21 @@ sub authLogout {
|
|||
return $res;
|
||||
}
|
||||
|
||||
## UserDB steps
|
||||
###############
|
||||
# Note that UserDB::Combination uses the same object.
|
||||
sub getUser {
|
||||
return $_[0]->try( 1, 'getUser', $_[1] );
|
||||
}
|
||||
|
||||
sub setSessionInfo {
|
||||
return $_[0]->try( 1, 'setSessionInfo', $_[1] );
|
||||
}
|
||||
|
||||
sub setGroups {
|
||||
return $_[0]->try( 1, 'setGroups', $_[1] );
|
||||
}
|
||||
|
||||
sub getStack {
|
||||
my ( $self, $req, @steps ) = @_;
|
||||
return $req->data->{combinationStack}
|
||||
|
@ -224,7 +229,6 @@ sub name {
|
|||
package Lemonldap::NG::Portal::Lib::Combination::UserLogger;
|
||||
|
||||
# This logger rewrite "warn" to "notice"
|
||||
|
||||
sub new {
|
||||
my ( $class, $realLogger ) = @_;
|
||||
return bless { logger => $realLogger }, $class;
|
||||
|
|
Loading…
Reference in New Issue
Block a user