diff options
author | justdave%syndicomm.com <> | 2001-07-01 11:00:56 +0200 |
---|---|---|
committer | justdave%syndicomm.com <> | 2001-07-01 11:00:56 +0200 |
commit | 092f07bfc3ff0259544f2dbd99d79868975f7167 (patch) | |
tree | 1ccf4d2d16b2467d1f7962045cc66e265bede3c3 | |
parent | a6bd4e9862d6fe2d09b9936188e6a7112cbe547d (diff) | |
download | bugzilla-092f07bfc3ff0259544f2dbd99d79868975f7167.tar.gz bugzilla-092f07bfc3ff0259544f2dbd99d79868975f7167.tar.xz |
Fix for bug 87596: improper definition of $::components in globals.pl
Patch by Dave Miller <justdave@syndicomm.com>
r= jake@acutex.net
-rwxr-xr-x | enter_bug.cgi | 2 | ||||
-rw-r--r-- | globals.pl | 2 |
2 files changed, 2 insertions, 2 deletions
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"; diff --git a/globals.pl b/globals.pl index 2b3456959..aa50355a0 100644 --- a/globals.pl +++ b/globals.pl @@ -501,7 +501,7 @@ sub GenerateVersionTable { foreach my $i (@list) { if (!defined $::components{$i}) { - $::components{$i} = ""; + $::components{$i} = []; } } @::legal_versions = sort {uc($a) cmp uc($b)} keys(%varray); |