$unconfirmedstate
$template
$vars
- %COOKIE
@enterable_products
@legal_opsys
@legal_platform
@legal_severity
@legal_keywords
$userid
- %MFORM
%versions
$proddesc
);
my $cgi = Bugzilla->cgi;
-if (!defined $::FORM{'product'}) {
+my $product = $cgi->param('product');
+
+if (!defined $product) {
GetVersionTable();
Bugzilla->login();
$vars->{'proddesc'} = \%products;
$vars->{'target'} = "enter_bug.cgi";
- $vars->{'format'} = $::FORM{'format'};
+ $vars->{'format'} = $cgi->param('format');
print $cgi->header();
$template->process("global/choose-product.html.tmpl", $vars)
|| ThrowTemplateError($template->error());
exit;
+ } else {
+ # Only one product exists
+ $product = (keys %products)[0];
}
-
- $::FORM{'product'} = (keys %products)[0];
- $::MFORM{'product'} = [$::FORM{'product'}];
-
}
-my $product = $::FORM{'product'};
-
##############################################################################
# Useful Subroutines
##############################################################################
sub formvalue {
my ($name, $default) = (@_);
- return $::FORM{$name} || $default || "";
+ return $cgi->param($name) || $default || "";
}
sub pickplatform {
}
elsif (1 == @{$::components{$product}}) {
# Only one component; just pick it.
- $::FORM{'component'} = $::components{$product}->[0];
+ $cgi->param('component', $::components{$product}->[0]);
}
my @components;
$vars->{'assigned_to'} = formvalue('assigned_to');
$vars->{'cc'} = formvalue('cc');
-$vars->{'reporter'} = $::COOKIE{'Bugzilla_login'};
$vars->{'product'} = $product;
$vars->{'bug_file_loc'} = formvalue('bug_file_loc', "http://");
$vars->{'short_desc'} = formvalue('short_desc');
$vars->{'version'} = $::versions{$product} || [];
if (formvalue('version')) {
$default{'version'} = formvalue('version');
-} elsif (exists $::COOKIE{"VERSION-$product"} &&
- lsearch($vars->{'version'}, $::COOKIE{"VERSION-$product"}) != -1) {
- $default{'version'} = $::COOKIE{"VERSION-$product"};
+} elsif (defined $cgi->cookie("VERSION-$product") &&
+ lsearch($vars->{'version'}, $cgi->cookie("VERSION-$product")) != -1) {
+ $default{'version'} = $cgi->cookie("VERSION-$product");
} else {
$default{'version'} = $vars->{'version'}->[$#{$vars->{'version'}}];
}
$vars->{'use_keywords'} = 1 if (@::legal_keywords);
my $format =
- GetFormat("bug/create/create", $::FORM{'format'}, $::FORM{'ctype'});
+ GetFormat("bug/create/create", scalar $cgi->param('format'),
+ scalar $cgi->param('ctype'));
print $cgi->header($format->{'ctype'});
$template->process($format->{'template'}, $vars)