diff options
| author |   myk%mozilla.org <> | 2002-04-17 09:55:10 +0000 |
|---|---|---|
| committer | myk%mozilla.org <> | 2002-04-17 09:55:10 +0000 |
| commit | 4d4346560206611d36a2456e629fc41b7cb85595 (patch) | |
| tree | 2085e28b45543fa1ddb1a64e03c8e8afed329aec /createaccount.cgi | |
| parent | bug 117718 - Mass Change removes a bugs groupset if the bug was in the (diff) | |
| download | bugzilla-4d4346560206611d36a2456e629fc41b7cb85595.tar.gz bugzilla-4d4346560206611d36a2456e629fc41b7cb85595.tar.bz2 bugzilla-4d4346560206611d36a2456e629fc41b7cb85595.zip | |
Fix for bug 136506: work-around taint error on Perl 5.005.
Patch by Davidy Avery <daa@rm.incc.net>.
2x r=myk
Diffstat (limited to 'createaccount.cgi')
| -rwxr-xr-x | createaccount.cgi | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/createaccount.cgi b/createaccount.cgi index aaec3b679..9f87f4612 100755 --- a/createaccount.cgi +++ b/createaccount.cgi @@ -63,6 +63,7 @@ my $realname = trim($::FORM{'realname'}); if (defined($login)) { # We've been asked to create an account. CheckEmailSyntax($login); + trick_taint($login); $vars->{'login'} = $login; if (!ValidateNewUser($login)) { |