From c08d220d3a39f92df2bd951817fd7b674a3278da Mon Sep 17 00:00:00 2001
From: "jake%acutex.net" <>
Date: Thu, 28 Jun 2001 22:42:29 +0000
Subject: Refix bug 80289. Don't print header for groups if there aren't any
 groups to display (was printing a header without groups in rare instances).
 Patch by Joe Robins <jmrobins@tgix.com> r= jake@acutex.net

---
 bug_form.pl | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

(limited to 'bug_form.pl')

diff --git a/bug_form.pl b/bug_form.pl
index 139e2fcf4..27c19e74c 100644
--- a/bug_form.pl
+++ b/bug_form.pl
@@ -379,9 +379,7 @@ if ($::usergroupset ne '0') {
 	    "order by description");
     # We only print out a header bit for this section if there are any
     # results.
-    if(MoreSQLData()) {
-      print "<br><b>Only users in the selected groups can view this bug:</b><br>\n";
-    }
+    my $groupFound = 0;
     while (MoreSQLData()) {
       my ($bit, $name, $description, $ison) = (FetchSQLData());
       # For product groups, we only want to display the checkbox if either
@@ -390,6 +388,11 @@ if ($::usergroupset ne '0') {
       # All other product groups will be skipped.  Non-product bug groups
       # will still be displayed.
       if($ison || ($name eq $bug{'product'}) || (!defined $::proddesc{$name})) {
+        if(!$groupFound) {
+          print "<br><b>Only users in the selected groups can view this bug:</b><br>\n";
+          print "<font size=\"-1\">(Leave all boxes unchecked to make this a public bug.)</font><br><br>\n";
+          $groupFound = 1;
+        }
         # Modifying this to use checkboxes instead
         my $checked = $ison ? " CHECKED" : "";
         # indent these a bit
-- 
cgit v1.2.3-24-g4f1b