Bug 205463 - Tokens aren't canceled after a successful login.

patch by 'Randall M! Gee', r=bbaetz, a=justdave


git-svn-id: svn://10.0.0.236/trunk@143414 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
bbaetz%acm.org 2003-06-07 03:36:46 +00:00
parent 0bb28378bc
commit e382ca74cc
3 changed files with 3 additions and 3 deletions

View File

@ -71,7 +71,7 @@ sub authenticate {
# Now we know that the user has logged in successfully,
# so delete any password tokens for them
require Token;
Token::DeletePasswordTokens("user logged in");
Token::DeletePasswordTokens($userid, "user_logged_in");
# The user may have had their account disabled
return (AUTH_DISABLED, $userid, $disabledtext)

View File

@ -246,7 +246,7 @@ sub DeletePasswordTokens {
"WHERE userid=? AND tokentype='password'");
$sth->execute($userid);
while (my $token = $sth->fetchrow_array) {
Token::Cancel($token, "user_logged_in");
Token::Cancel($token, $reason);
}
}

View File

@ -246,7 +246,7 @@ sub DeletePasswordTokens {
"WHERE userid=? AND tokentype='password'");
$sth->execute($userid);
while (my $token = $sth->fetchrow_array) {
Token::Cancel($token, "user_logged_in");
Token::Cancel($token, $reason);
}
}