diff options
author | jocuri%softhome.net <> | 2004-02-24 20:25:11 +0000 |
---|---|---|
committer | jocuri%softhome.net <> | 2004-02-24 20:25:11 +0000 |
commit | 7883861f7dc34a6cd5483cff72a6774f2deb45ed (patch) | |
tree | db41d5d6dad8c72ac14d74799b2baa869e738493 /createaccount.cgi | |
parent | 6d94220d7b98356740d7d7e3a64c437bc7a83993 (diff) | |
download | bugs-7883861f7dc34a6cd5483cff72a6774f2deb45ed.tar bugs-7883861f7dc34a6cd5483cff72a6774f2deb45ed.tar.gz bugs-7883861f7dc34a6cd5483cff72a6774f2deb45ed.tar.bz2 bugs-7883861f7dc34a6cd5483cff72a6774f2deb45ed.tar.xz bugs-7883861f7dc34a6cd5483cff72a6774f2deb45ed.zip |
Patch for bug 235175: replaces ::FORM from createaccount.cgi with CGI based methods that are mod_perl compatible; r=gerv; a=justdave.
Diffstat (limited to 'createaccount.cgi')
-rwxr-xr-x | createaccount.cgi | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/createaccount.cgi b/createaccount.cgi index 22b8129e9..6c624b0ba 100755 --- a/createaccount.cgi +++ b/createaccount.cgi @@ -32,7 +32,6 @@ require "CGI.pl"; # Shut up misguided -w warnings about "used only once": use vars qw( - %FORM $template $vars ); @@ -54,11 +53,11 @@ Bugzilla->logout(); my $cgi = Bugzilla->cgi; print $cgi->header(); -my $login = $::FORM{'login'}; +my $login = $cgi->param('login'); if (defined($login)) { # We've been asked to create an account. - my $realname = trim($::FORM{'realname'}); + my $realname = trim($cgi->param('realname')); CheckEmailSyntax($login); $vars->{'login'} = $login; |