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

2013-10-18 04:42:56 +00:00 · 2013-10-18 04:42:56 +00:00 · 2b5de50614
commit 2b5de50614
parent f29d3b563e
1 changed files with 3 additions and 1 deletions
--- a/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/AuthSSL.pm
+++ b/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/AuthSSL.pm
@ -61,7 +61,9 @@ sub setAuthSessionInfo {
 # @return Lemonldap::NG::Portal constant
 sub authenticate {
    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