From 9042b58f0ceb4896bd99542a3f59a368158bbccc Mon Sep 17 00:00:00 2001
From: "bbaetz%cs.mcgill.ca" <>
Date: Tue, 23 Oct 2001 22:44:50 +0000
Subject: Bug 97469 - Assignee/QA/Reporter/CC don't get email on restricted
 bugs. Also fixes seeing bugs in the buglist (bug 95024), dependancy lists,
 tooltips, duplicates, and everywhere else I could see which checked group
 bugs.groupset == 0.

Also fxed bug 101560, by clearing BASH_ENV

r=myk,justdave
---
 long_list.cgi | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'long_list.cgi')

diff --git a/long_list.cgi b/long_list.cgi
index 494103823..0cde1e93a 100755
--- a/long_list.cgi
+++ b/long_list.cgi
@@ -32,6 +32,7 @@ require "CGI.pl";
 sub sillyness {
     my $zz;
     $zz = $::legal_keywords;
+    $zz = $::userid;
     $zz = $::usergroupset;
     $zz = %::FORM;
 }
@@ -68,12 +69,12 @@ select
   bugs.status_whiteboard,
   bugs.keywords
 from bugs,profiles assign,profiles report
-where assign.userid = bugs.assigned_to and report.userid = bugs.reporter and
-bugs.groupset & $::usergroupset = bugs.groupset and";
+where assign.userid = bugs.assigned_to and report.userid = bugs.reporter and";
 
 $::FORM{'buglist'} = "" unless exists $::FORM{'buglist'};
 foreach my $bug (split(/:/, $::FORM{'buglist'})) {
-    SendSQL("$generic_query bugs.bug_id = $bug");
+    SendSQL(SelectVisible("$generic_query bugs.bug_id = $bug",
+                          $::userid, $::usergroupset));
 
     my @row;
     if (@row = FetchSQLData()) {
-- 
cgit v1.2.3-24-g4f1b