Commit 6106f37f authored by Xavier Guimard's avatar Xavier Guimard

Fix "refresh" feature for Choice

Fixes: #1339
parent 55aaed7a
......@@ -31,7 +31,9 @@ sub authenticate {
}
sub setAuthSessionInfo {
return $_[1]->datas->{enabledMods0}->[0]->setAuthSessionInfo( $_[1] );
my ( $self, $req ) = @_;
$self->checkChoice($req) unless ( $req->datas->{enabledMods0} );
return $req->datas->{enabledMods0}->[0]->setAuthSessionInfo($req);
}
sub authLogout {
......
......@@ -57,7 +57,8 @@ sub init {
sub checkChoice {
my ( $self, $req ) = @_;
my $name =
$req->sessionInfo->{_choice}
$req->userData->{_choice}
|| $req->sessionInfo->{_choice}
|| $req->param( $self->conf->{authChoiceParam} )
or return 0;
return $name if ( $req->datas->{ "enabledMods" . $self->type } );
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment