Sort functions & append comments

This commit is contained in:
Christophe Maudoux 2019-08-10 11:13:56 +02:00
parent 13378c3150
commit 52fa94bd55

View File

@ -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;