From 092f07bfc3ff0259544f2dbd99d79868975f7167 Mon Sep 17 00:00:00 2001
From: "justdave%syndicomm.com" <>
Date: Sun, 1 Jul 2001 09:00:56 +0000
Subject: Fix for bug 87596: improper definition of $::components in globals.pl
 Patch by Dave Miller <justdave@syndicomm.com> r= jake@acutex.net

---
 enter_bug.cgi | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'enter_bug.cgi')

diff --git a/enter_bug.cgi b/enter_bug.cgi
index c1f4e61b1..91622590c 100755
--- a/enter_bug.cgi
+++ b/enter_bug.cgi
@@ -237,7 +237,7 @@ my $platform_popup = make_popup('rep_platform', \@::legal_platform,
                                 pickplatform(), 0);
 my $opsys_popup = make_popup('op_sys', \@::legal_opsys, pickos(), 0);
 
-if (0 == $::components{$product}) {
+if (0 == @{$::components{$product}}) {
 	print "<H1>Permission Denied</H1>\n";
 	print "Sorry.  You need to have at least one component for this product\n";
 	print "in order to create a new bug.  Go to the \"Components\" link to create\n";
-- 
cgit v1.2.3-24-g4f1b