Add missing return when CAS user is invalid

diff --git a/C4/Auth.pm b/C4/Auth.pm
index c594cc9..3769cde 100755 (executable)
--- a/C4/Auth.pm
+++ b/C4/Auth.pm
@@ -1342,6 +1342,7 @@ sub checkpw {
         my ($retval,$retcard,$retuserid) = checkpw_cas($dbh, $ticket, $query);    # EXTERNAL AUTH
        warn "retval : $retval $retcard";
         ($retval) and return ($retval,$retcard,$retuserid);
+       return 0;
     }
 
     # INTERNAL AUTH