Bug 110980 - no email to cc list when opening new bug

original patch by jake@bugzilla.org, merged to current sources by
bbaetz@student.usyd.edu.au
r=gerv, justdave
This commit is contained in:
bbaetz%student.usyd.edu.au 2002-04-14 04:43:55 +00:00
Родитель b1d95bffd8
Коммит d66fd9e89d
2 изменённых файлов: 25 добавлений и 2 удалений

Просмотреть файл

@ -242,6 +242,7 @@ SendSQL("INSERT INTO longdescs (bug_id, who, bug_when, thetext)
my %ccids;
my $ccid;
my @cc;
# Add the CC list
if (defined $::FORM{'cc'}) {
@ -251,15 +252,32 @@ if (defined $::FORM{'cc'}) {
if ($ccid && !$ccids{$ccid}) {
SendSQL("INSERT INTO cc (bug_id, who) VALUES ($id, $ccid)");
$ccids{$ccid} = 1;
push(@cc, $person);
}
}
}
}
# Assemble the -force* strings so this counts as "Added to this capacity"
my @ARGLIST = ();
if (@cc) {
push (@ARGLIST, "-forcecc", join(",", @cc));
}
push (@ARGLIST, "-forceowner", DBID_to_name($::FORM{assigned_to}));
if (defined $::FORM{qacontact}) {
push (@ARGLIST, "-forceqacontact", DBID_to_name($::FORM{qacontact}));
}
push (@ARGLIST, "-forcereporter", DBID_to_name($::userid));
push (@ARGLIST, $id, $::COOKIE{'Bugzilla_login'});
# Send mail to let people know the bug has been created.
# See attachment.cgi for explanation of why it's done this way.
my $mailresults = '';
open(PMAIL, "-|") or exec('./processmail', $id, $::COOKIE{'Bugzilla_login'});
open(PMAIL, "-|") or exec('./processmail', @ARGLIST);
$mailresults .= $_ while <PMAIL>;
close(PMAIL);

Просмотреть файл

@ -818,10 +818,15 @@ if ($#ARGV >= 0 && $ARGV[0] eq "-forceqacontact") {
@{$force{'QAcontact'}} = (trim(shift(@ARGV)));
}
if ($#ARGV >= 0 && $ARGV[0] eq "-forcereporter") {
shift(@ARGV);
@{$force{'Reporter'}} = trim(shift(@ARGV));
}
if (($#ARGV < 0) || ($#ARGV > 1)) {
print "Usage:\n processmail {bugid} {nametoexclude} " .
"[-forcecc list,of,users]\n [-forceowner name] " .
"[-forceqacontact name]\nor\n" .
"[-forceqacontact name]\n [-forcereporter name]\nor\n" .
" processmail rescanall\n";
exit;
}