From 610644ae89b97ee27864eaff8d0f16f351356ea9 Mon Sep 17 00:00:00 2001
From: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Date: Thu, 5 Jan 2023 12:16:38 +0000
Subject: [PATCH] Bug 32208: (follow-up) Fix compile issue

The tests are failing, so this needs some more thought.
---
 C4/Auth.pm | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/C4/Auth.pm b/C4/Auth.pm
index 241babde46..6c45d42d1d 100644
--- a/C4/Auth.pm
+++ b/C4/Auth.pm
@@ -1109,13 +1109,10 @@ sub checkauth {
                     $loggedin = 1;
                 }
                 else {
-                    $auth_state = 'failed';
-                    # FIXME We could add $return = 0; or even delete the session?
-                    # Currently return == 1 and we will fill session info later on,
-                    # although we do present an authorization failure. (Yes, the
-                    # authentication was actually correct.)
                     $info{'nopermission'} = 1;
                     C4::Context::_unset_userenv($sessionID);
+                    $sessionID = undef;
+                    $userid    = undef;
                 }
                 my ( $borrowernumber, $firstname, $surname, $userflags,
                     $branchcode, $branchname, $emailaddress, $desk_id,
-- 
2.39.5