More debug (#707)

6943c49c · Yadd · 9ab04631 · 6943c49c
Commit 6943c49c authored Apr 05, 2017 by Yadd
Hide whitespace changes
Inline Side-by-side

Showing with 3 additions and 0 deletions

lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Auth/Kerberos.pm lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Auth/Kerberos.pm +3 -0

No files found.
--- a/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Auth/Kerberos.pm
+++ b/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Auth/Kerberos.pm
@@ -65,6 +65,9 @@ sub extractFormInfo {
    $status = $gss_client_name->display($client_name);
    unless ($status) {
        $self->logger->error('Unable to display KRB client name');
+        foreach ( $status->generic_message(), $status->specific_message() ) {
+            $self->logger->error($_);
+        }
        return PE_ERROR;
    }
    $req->user($client_name);