Modify r2981 changes: now authenticate() launch extractFormInfo() if auth isn't done
This commit is contained in:
parent
f29d3b563e
commit
2b5de50614
|
@ -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
|
||||||
|
|
Loading…
Reference in New Issue
Block a user