From: terry%mozilla.org <>
Date: Thu, 16 Mar 2000 05:06:02 +0000 (+0000)
Subject: Add a "send mail to bug owners" link (under circumstances where it
X-Git-Tag: bugzilla-2.12~342
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=36feed94ac903b60c7baa9c8b9daf96dfceb5078;p=thirdparty%2Fbugzilla.git
Add a "send mail to bug owners" link (under circumstances where it
seems useful and appropriate.)
---
diff --git a/buglist.cgi b/buglist.cgi
index a776bbc0ba..b333d9b6e7 100755
--- a/buglist.cgi
+++ b/buglist.cgi
@@ -1006,6 +1006,7 @@ my @bugarray;
my %prodhash;
my %statushash;
my $buggroupset = "";
+my %ownerhash;
my $pricol = -1;
my $sevcol = -1;
@@ -1073,6 +1074,9 @@ while (@row = FetchSQLData()) {
if (!defined $value) {
next;
}
+ if ($c eq "owner") {
+ $ownerhash{$value} = 1;
+ }
if ($::needquote{$c}) {
$value = html_quote($value);
} else {
@@ -1382,6 +1386,16 @@ if ($count > 0) {
print "";
print "Change several bugs at once\n";
}
+ my @owners = sort(keys(%ownerhash));
+ if (@owners > 1 && UserInGroup("editbugs")) {
+ my $suffix = Param('emailsuffix');
+ if ($suffix ne "") {
+ map(s/$/$suffix/, @owners);
+ }
+ my $list = join(',', @owners);
+ print qq{ \n};
+ print qq{Send mail to bug owners\n};
+ }
print qq{ \n};
print qq{Edit this query\n};
print "\n";