From 83c52d395f0be87362b9fd2994edacdb86f9b569 Mon Sep 17 00:00:00 2001
From: "justdave%syndicomm.com" <>
Date: Wed, 30 May 2001 03:30:51 +0000
Subject: Fix for bug 65399: Can't use string ("") as an ARRAY ref while
 "strict refs" in use at query.cgi due to no components defined in a product.
 Patch by Matthias Radestock <matthias@sorted.org> r= justdave@syndicomm.com

---
 query.cgi | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'query.cgi')

diff --git a/query.cgi b/query.cgi
index 0c171ce58..f9822bd5f 100755
--- a/query.cgi
+++ b/query.cgi
@@ -292,8 +292,10 @@ foreach my $p (@::legal_product) {
     next;
   }
   push @::product_list, $p;
-  foreach my $c (@{$::components{$p}}) {
-    $component_set{$c} = 1;
+  if ($::components{$p}) {
+    foreach my $c (@{$::components{$p}}) {
+      $component_set{$c} = 1;
+    }
   }
   foreach my $v (@{$::versions{$p}}) {
     $version_set{$v} = 1;
-- 
cgit v1.2.3-24-g4f1b