From a010fc5ee1e1d1bb419da876139231893f636497 Mon Sep 17 00:00:00 2001
From: cjwatson <>
Date: Wed, 16 Jul 2003 09:08:04 -0800
Subject: [PATCH] [project @ 2003-07-16 10:08:04 by cjwatson] Add support for
an X-Debbugs-No-Ack: mail header to suppress acknowledgements.
---
debian/changelog | 2 ++
html/Reporting.html.in | 17 +++++++++++++++++
scripts/process.in | 32 +++++++++++++++++---------------
3 files changed, 36 insertions(+), 15 deletions(-)
diff --git a/debian/changelog b/debian/changelog
index d6327c47..2fc24fb1 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -7,6 +7,8 @@ debbugs (2.4.2) UNRELEASED; urgency=low
* Colin Watson:
- Add (slightly) fancy CGI decoding of message/* MIME types.
- CGI scripts now support multiple maintainers for a single package.
+ - Add support for an X-Debbugs-No-Ack: mail header to suppress
+ acknowledgements.
-- Colin Watson <cjwatson@debian.org> Fri, 20 Jun 2003 18:57:25 +0100
diff --git a/html/Reporting.html.in b/html/Reporting.html.in
index 30ced957..bba28d62 100644
--- a/html/Reporting.html.in
+++ b/html/Reporting.html.in
@@ -225,6 +225,23 @@ only a summary).
any forwarded message so that replies will by default be processed in
the same way as the original report.
+
+<h2>Acknowledgements</h2>
+
+<p>Normally, the $gBug system will return an acknowledgement to you by
+e-mail when you report a new bug or submit additional information to an
+existing bug. If you want to suppress this acknowledgement, include an
+<code>X-Debbugs-No-Ack</code> header in your e-mail (the contents of this
+header do not matter; however, it must be in the mail header and
+<em>not</em> in the pseudo-header with the <code>Package</code> field). If
+you report a new $gBug with this header, you will need to check the web
+interface yourself to find the $gBug number.</p>
+
+<p>Note that this header will not suppress acknowledgements from the
+<code>control\@$gEmailDomain</code> mailserver, since those acknowledgements
+may contain error messages which should be read and acted upon.</p>
+
+
<h3>$gBug reports against unknown packages</h3>
<p>If the $gBug tracking system doesn't know who the maintainer of the
diff --git a/scripts/process.in b/scripts/process.in
index 2d31c99d..05f23808 100755
--- a/scripts/process.in
+++ b/scripts/process.in
@@ -1,5 +1,5 @@
#!/usr/bin/perl
-# $Id: process.in,v 1.72 2003/06/23 11:23:35 cjwatson Exp $
+# $Id: process.in,v 1.73 2003/07/16 10:08:04 cjwatson Exp $
#
# Usage: process nn
# Temps: incoming/Pnn
@@ -102,7 +102,7 @@ for my $hdr (@headerlines) {
s/\n\s/ /g;
&finish if m/^x-loop: (\S+)$/i && $1 eq "$gMaintainerEmail";
my $ins = !m/^subject:/i && !m/^reply-to:/i && !m/^return-path:/i
- && !m/^From / && !m/^X-Debbugs-CC:/i;
+ && !m/^From / && !m/^X-Debbugs-/i;
$fwd .= $hdr."\n" if $ins;
# print DEBUG ">$_<\n";
if (s/^(\S+):\s*//) {
@@ -702,12 +702,13 @@ if (length($resentccval)) {
$htmlbreak = " Copy sent to <code>".&sani($resentccval)."</code>.".
$htmlbreak;
}
-if ($newref) {
- &htmllog("Acknowledgement","sent",$replyto,
- ($veryquiet ?
- "New $gBug report received and filed, but not forwarded." :
- "New $gBug report received and forwarded."). $htmlbreak);
- &sendmessage($veryquiet ? <<END : $codeletter eq 'M' ? <<END : <<END,'');
+unless (exists $header{'x-debbugs-no-ack'}) {
+ if ($newref) {
+ &htmllog("Acknowledgement","sent",$replyto,
+ ($veryquiet ?
+ "New $gBug report received and filed, but not forwarded." :
+ "New $gBug report received and forwarded."). $htmlbreak);
+ &sendmessage($veryquiet ? <<END : $codeletter eq 'M' ? <<END : <<END,'');
From: $gMaintainerEmail ($gProject $gBug Tracking System)
To: $replyto
Subject: $gBug#$ref: Acknowledgement of QUIET report
@@ -793,13 +794,13 @@ $brokenness
$gMaintainer
(administrator, $gProject $gBugs database)
END
-} elsif ($codeletter ne 'U' and
- $header{'precedence'} !~ /\b(?:bulk|junk|list)\b/) {
- &htmllog("Acknowledgement","sent",$replyto,
- ($veryquiet ? "Extra info received and filed, but not forwarded." :
- $codeletter eq 'M' ? "Extra info received and forwarded to maintainer." :
- "Extra info received and forwarded to list."). $htmlbreak);
- &sendmessage($veryquiet ? <<END : $codeletter eq 'M' ? <<END : <<END,'');
+ } elsif ($codeletter ne 'U' and
+ $header{'precedence'} !~ /\b(?:bulk|junk|list)\b/) {
+ &htmllog("Acknowledgement","sent",$replyto,
+ ($veryquiet ? "Extra info received and filed, but not forwarded." :
+ $codeletter eq 'M' ? "Extra info received and forwarded to maintainer." :
+ "Extra info received and forwarded to list."). $htmlbreak);
+ &sendmessage($veryquiet ? <<END : $codeletter eq 'M' ? <<END : <<END,'');
From: $gMaintainerEmail ($gProject $gBug Tracking System)
To: $replyto
Subject: $gBug#$ref: Info received and FILED only
@@ -879,6 +880,7 @@ $brokenness
$gMaintainer
(administrator, $gProject $gBugs database)
END
+ }
}
&appendlog;
--
2.39.5