From: cjwatson <> Date: Fri, 28 Mar 2003 07:29:19 +0000 (-0800) Subject: [project @ 2003-03-27 23:29:19 by cjwatson] X-Git-Tag: release/2.6.0~939 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=50bbff48425929e5f0013938b9c5ad1ac75293de;p=debbugs.git [project @ 2003-03-27 23:29:19 by cjwatson] Add "Precedence: bulk" to the mail headers of all acks, defined as anything that's sent back to $replyto (#36413). --- diff --git a/scripts/process.in b/scripts/process.in index 4c0140cb..a7748675 100755 --- a/scripts/process.in +++ b/scripts/process.in @@ -1,5 +1,5 @@ #!/usr/bin/perl -# $Id: process.in,v 1.61 2003/03/27 19:37:21 cjwatson Exp $ +# $Id: process.in,v 1.62 2003/03/27 23:29:19 cjwatson Exp $ # # Usage: process nn # Temps: incoming/Pnn @@ -191,6 +191,7 @@ Subject: Unknown problem report $gBug#$tryref ($subject) Message-ID: In-Reply-To: $header{'message-id'} References: $header{'message-id'} $s_msgid +Precedence: bulk X-$gProject-PR-Message: error You sent a message to the $gBug tracking system which gave (in the @@ -266,6 +267,7 @@ Subject: Message with no $gBug number ignored by $receivedat Message-ID: In-Reply-To: $header{'message-id'} References: $header{'message-id'} $s_msgid +Precedence: bulk X-$gProject-PR-Message: error You sent a message to the $gProject $gBug tracking system old-style @@ -338,6 +340,7 @@ ${noticecc}Subject: $gBug#$ref: marked as forwarded ($s_subject) Message-ID: In-Reply-To: $header{'message-id'} References: $header{'message-id'} $s_msgid +Precedence: bulk X-$gProject-PR-Message: forwarded $ref Your message dated $header{'date'} @@ -365,6 +368,7 @@ ${noticecc}Subject: $gBug#$ref: marked as done ($s_subject) Message-ID: In-Reply-To: $header{'message-id'} References: $header{'message-id'} $s_msgid +Precedence: bulk X-$gProject-PR-Message: closed $ref Your message dated $header{'date'} @@ -429,6 +433,7 @@ Subject: Message with no $gBug number cannot be sent to submitter ! Message-ID: In-Reply-To: $header{'message-id'} References: $header{'message-id'} $s_msgid +Precedence: bulk X-$gProject-PR-Message: error You sent a message to the $gProject $gBug tracking system send to $gBug @@ -473,6 +478,7 @@ Subject: Message with no Package: tag cannot be processed! Message-ID: In-Reply-To: $header{'message-id'} References: $header{'message-id'} $s_msgid +Precedence: bulk X-$gProject-PR-Message: error Your message didn't have a Package: line at the start (in the @@ -693,6 +699,7 @@ Subject: $gBug#$ref: Acknowledgement of QUIET report Message-ID: In-Reply-To: $header{'message-id'} References: $header{'message-id'} +Precedence: bulk X-$gProject-PR-Message: ack-quiet $ref Reply-To: $ref-quiet\@$gEmailDomain @@ -720,6 +727,7 @@ Subject: $gBug#$ref: Acknowledgement of maintainer-only report Message-ID: In-Reply-To: $header{'message-id'} References: $header{'message-id'} +Precedence: bulk X-$gProject-PR-Message: ack-maintonly $ref Reply-To: $ref-maintonly\@$gEmailDomain @@ -744,6 +752,7 @@ Subject: $gBug#$ref: Acknowledgement ($subject) Message-ID: In-Reply-To: $header{'message-id'} References: $header{'message-id'} +Precedence: bulk X-$gProject-PR-Message: ack $ref Reply-To: $ref\@$gEmailDomain @@ -776,6 +785,7 @@ Subject: $gBug#$ref: Info received and FILED only Message-ID: In-Reply-To: $header{'message-id'} References: $header{'message-id'} +Precedence: bulk X-$gProject-PR-Message: ack-info-quiet $ref Reply-To: $ref-quiet\@$gEmailDomain @@ -801,6 +811,7 @@ Subject: $gBug#$ref: Info received for maintainer only Message-ID: In-Reply-To: $header{'message-id'} References: $header{'message-id'} +Precedence: bulk X-$gProject-PR-Message: ack-info-maintonly $ref Reply-To: $ref-maintonly\@$gEmailDomain @@ -823,6 +834,7 @@ Subject: $gBug#$ref: Info received (was $subject) Message-ID: In-Reply-To: $header{'message-id'} References: $header{'message-id'} +Precedence: bulk X-$gProject-PR-Message: ack-info $ref Disabled-Doogie-Reply-To: $ref\@$gEmailDomain diff --git a/scripts/service.in b/scripts/service.in index 25c1df58..8c59c419 100755 --- a/scripts/service.in +++ b/scripts/service.in @@ -1,5 +1,5 @@ #!/usr/bin/perl -# $Id: service.in,v 1.71 2003/03/10 00:45:37 cjwatson Exp $ +# $Id: service.in,v 1.72 2003/03/27 23:29:19 cjwatson Exp $ # ^ more or less ^ # # Usage: service .nn @@ -654,6 +654,7 @@ ${maintccs}Subject: Processed: $header{'subject'} In-Reply-To: $header{'message-id'} References: $header{'message-id'} Message-ID: +Precedence: bulk ${transcript}Please contact me if you need assistance. @@ -975,6 +976,7 @@ Subject: $gProject $gBug help: $description References: $header{'message-id'} In-Reply-To: $header{'message-id'} Message-ID: +Precedence: bulk END $ok++; @@ -1001,6 +1003,7 @@ Subject: $gProject $gBugs information: $description References: $header{'message-id'} In-Reply-To: $header{'message-id'} Message-ID: +Precedence: bulk END $ok++; @@ -1099,6 +1102,7 @@ Subject: $gProject $gBugs information: $description References: $header{'message-id'} In-Reply-To: $header{'message-id'} Message-ID: +Precedence: bulk $description follows: