Add missing return when CAS user is invalid

This commit is contained in:
Matthias Meusburger 2009-05-07 15:11:44 +02:00 committed by Henri-Damien LAURENT
parent 36a01ea347
commit 26d85c3cd6

View file

@ -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