From c0fc50d35b1e3320b28b281c16489f78babc5abb Mon Sep 17 00:00:00 2001
From: "jocuri%softhome.net" <>
Date: Sat, 27 Mar 2004 05:00:11 +0000
Subject: Patch for bug 237369: implement relatively simple changes from %FORM
 to $cgi->param variable; patch by Teemu Mannermaa <wicked@etlicon.fi>;
 r=kiko, justdave; a=justdave.

---
 describecomponents.cgi | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

(limited to 'describecomponents.cgi')

diff --git a/describecomponents.cgi b/describecomponents.cgi
index 05af91949..922a4912e 100755
--- a/describecomponents.cgi
+++ b/describecomponents.cgi
@@ -22,7 +22,6 @@
 #                 Bradley Baetz <bbaetz@student.usyd.edu.au>
 
 use vars qw(
-  %FORM
   %legal_product
   $userid
 );
@@ -41,8 +40,9 @@ quietly_check_login();
 GetVersionTable();
 
 my $cgi = Bugzilla->cgi;
+my $product = $cgi->param('product');
 
-if (!defined $::FORM{'product'}) {
+if (!$product) {
     # Reference to a subset of %::proddesc, which the user is allowed to see
     my %products;
 
@@ -73,11 +73,9 @@ if (!defined $::FORM{'product'}) {
         exit;
     }
 
-    $::FORM{'product'} = (keys %products)[0];
+    $product = (keys %products)[0];
 }
 
-my $product = $::FORM{'product'};
-
 # Make sure the user specified a valid product name.  Note that
 # if the user specifies a valid product name but is not authorized
 # to access that product, they will receive a different error message
-- 
cgit v1.2.3-24-g4f1b