This determines if the user's account details can be modified. If this
method returns a C<true> value, then accounts can be created and modified
through the Bugzilla user interface. Forgotten passwords can also be
-retrieved through the L<Token interface|Token>.
+retrieved through the L<Token interface|Bugzilla::Token>.
=back
# The user's credentials are okay, so delete any outstanding
# password tokens they may have generated.
- require Token;
- Token::DeletePasswordTokens($userid, "user_logged_in");
+ require Bugzilla::Token;
+ Bugzilla::Token::DeletePasswordTokens($userid, "user_logged_in");
# Account may have been disabled
my $disabledtext = $class->get_disabled($userid);
# Make it harder for us to do dangerous things in Perl.
use strict;
-# Bundle the functions in this file together into the "Token" package.
+# Bundle the functions in this file together into the "Bugzilla::Token" package.
package Bugzilla::Token;
use Bugzilla::Config;
"WHERE userid=? AND tokentype='password'");
$sth->execute($userid);
while (my $token = $sth->fetchrow_array) {
- Token::Cancel($token, $reason);
+ Bugzilla::Token::Cancel($token, $reason);
}
}
################################################################################
sub requestChangePassword {
- Token::IssuePasswordToken($cgi->param('loginname'));
+ Bugzilla::Token::IssuePasswordToken($cgi->param('loginname'));
$vars->{'message'} = "password_change_request";
# The new email address should be available as this was
# confirmed initially so cancel token if it is not still available
if (! ValidateNewUser($new_email,$old_email)) {
- $vars->{'email'} = $new_email; # Needed for Token::Cancel's mail
- Token::Cancel($::token,"account_exists");
+ $vars->{'email'} = $new_email; # Needed for Bugzilla::Token::Cancel's mail
+ Bugzilla::Token::Cancel($::token,"account_exists");
ThrowUserError("account_exists", { email => $new_email } );
}