[project @ 2001-02-20 09:45:50 by ajt]

[debbugs.git] / scripts / process.in

diff --git a/scripts/process.in b/scripts/process.in
index 9d80c056f1b7710055870674009b455d841b8eb7..d1b6f2d11ac7bc36650566b610d243706dadf59d 100755 (executable)
--- a/scripts/process.in
+++ b/scripts/process.in
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: process.in,v 1.19 2000/10/10 20:10:34 joy Exp $
+# $Id: process.in,v 1.22 2000/11/22 10:02:51 joy Exp $
 #
 # Usage: process nn
 # Temps:  incoming/Pnn
@@ -10,6 +10,7 @@ require( '/usr/lib/debbugs/errorlib' );
 chdir( "$gSpoolDir" ) || die 'chdir spool: $!\n';
 
 #open(DEBUG,"> /tmp/debbugs.debug");
+open DEBUG, ">/dev/null";
 
 defined( $intdate= time ) || &quit( "failed to get time: $!" );
 
@@ -276,7 +277,6 @@ X-$gProject-PR-Message: forwarded $ref
 
 Your message dated $header{'date'}
 with message-id $header{'message-id'}
-and subject line $subject
 has caused the $gProject $gBug report #$ref,
 regarding $s_subject
 to be marked as having been forwarded to the upstream software
@@ -323,13 +323,16 @@ END
             &sendmessage(<<END.join("\n",@msg),'');
 From: $gMaintainerEmail ($gProject $gBug Tracking System)
 To: $s_originator
-Subject: $gBug#$ref acknowledged by developer ($s_subject)
+Subject: $gBug#$ref acknowledged by developer
+         ($header{'subject'})
 Message-ID: <handler.$ref.$nn.notifdone\@$gEmailDomain>
 In-Reply-To: $s_msgid
 References: $header{'message-id'} $s_msgid
 X-$gProject-PR-Message: they-closed $ref
 
-This is an automatic notification regarding your $gBug report.
+This is an automatic notification regarding your $gBug report
+#$ref: $s_subject,
+which was filed against the $s_package package.
 
 It has been closed by one of the developers, namely
 $markedby.
@@ -396,7 +399,7 @@ END
     }
     if (!defined($pheader{'package'}))
        {       &htmllog("Warning","sent",$replyto,"Message not forwarded.");
-        &sendmessage(<<END, '');
+        &sendmessage(<<END."---------------------------------------------------------------------------\n".join("\n", @msg), '');
 From: $gMaintainerEmail ($gProject $gBug Tracking System)
 To: $replyto
 Subject: Message with no Package: tag cannot be processed!
@@ -411,12 +414,13 @@ pseudo-header following the real mail header), or didn't have a
 pseudo-header at all.
 
 This makes it much harder for us to categorise and deal with your
-problem report. Please resubmit your report and tell us which package the
-report is on.  For help, check out http://$gWebDomain/Reporting.html.
+problem report. Please _resubmit_ your report and tell us which package
+the report is on. For help, check out http://$gWebDomain/Reporting.html.
 
 Your message was dated $header{'date'} and had
 message-id $header{'message-id'}
 and subject $subject.
+The complete text of it is attached to this message.
 
 If you need any assistance or explanation please contact me.