From: don <> Date: Fri, 19 Aug 2005 12:44:28 +0000 (-0800) Subject: [project @ 2005-08-19 05:44:28 by don] X-Git-Tag: release/2.6.0~655 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=93a5c3ee0f4289f381ea8751b8f5ffb1a9215a72;p=debbugs.git [project @ 2005-08-19 05:44:28 by don] * Fix spamming on closing of merged bugs (closes: 323846) by actually understanding what the for $ref (@process) loop was doing. --- diff --git a/scripts/process.in b/scripts/process.in index 09756f95..a215aaab 100755 --- a/scripts/process.in +++ b/scripts/process.in @@ -1,5 +1,5 @@ #!/usr/bin/perl -# $Id: process.in,v 1.102 2005/08/17 21:46:16 don Exp $ +# $Id: process.in,v 1.103 2005/08/19 05:44:28 don Exp $ # # Usage: process nn # Temps: incoming/Pnn @@ -333,20 +333,10 @@ END &checkmaintainers; - # Add bug mailing lists as appropriate - my @bug_mailing_lists; - push @bug_mailing_lists, map {"bugs=$_\@$gListDomain"} ($ref, split (/ /, $data->{mergedwith})); - $noticeccval.= join(', ', grep($_ ne $replyto,@maintaddrs)); $noticeccval =~ s/\s+\n\s+/ /g; $noticeccval =~ s/^\s+/ /; $noticeccval =~ s/\s+$//; - - $generalcc = join(', ', $generalcc, @addsrcaddrs, @bug_mailing_lists); - $generalcc =~ s/\s+\n\s+/ /g; - $generalcc =~ s/^\s+/ /; $generalcc =~ s/\s+$//; - if (length($noticeccval)) { $noticecc= "Cc: $noticeccval\n"; } - if (length($generalcc)) { $noticecc.= "Bcc: $generalcc\n"; } @process= ($ref,split(/ /,$data->{mergedwith})); $orgref= $ref; @@ -369,6 +359,12 @@ END } } + # Add bug mailing list to $generalbcc as appropriate + my $generalbcc = join(', ', $generalcc, @addsrcaddrs,"bugs=$ref\@$gListDomain"); + $generalbcc =~ s/\s+\n\s+/ /g; + $generalbcc =~ s/^\s+/ /; $generalbcc =~ s/\s+$//; + if (length $generalbcc) {$generalbcc = "Bcc: $generalbcc\n"}; + writebug($ref, $data); my $hash = get_hashname($ref); @@ -379,7 +375,7 @@ END &sendmessage(<{subject}) +${noticecc}${generalbcc}Subject: $gBug#$ref: marked as forwarded ($data->{subject}) Message-ID: In-Reply-To: $header{'message-id'} References: $header{'message-id'} $data->{msgid} @@ -409,7 +405,7 @@ END &sendmessage(<{subject}) +${noticecc}${generalbcc}Subject: $gBug#$ref: marked as done ($data->{subject}) Message-ID: In-Reply-To: $header{'message-id'} References: $header{'message-id'} $data->{msgid}