Modify r2981 changes: now authenticate() launch extractFormInfo() if auth isn't done

This commit is contained in:
Xavier Guimard 2013-10-18 04:42:56 +00:00
parent f29d3b563e
commit 2b5de50614

View File

@ -61,7 +61,9 @@ sub setAuthSessionInfo {
# @return Lemonldap::NG::Portal constant # @return Lemonldap::NG::Portal constant
sub authenticate { sub authenticate {
my $self = shift; my $self = shift;
return $ENV{ $self->{SSLVar} } ? PE_OK : PE_ERROR; return ( $self->{user} and $ENV{ $self->{SSLVar} } )
? PE_OK
: $self->extractFormInfo();
} }
## @method string getDisplayType ## @method string getDisplayType