From 3dfaca9b565d883991883feace4d970b5c4fe579 Mon Sep 17 00:00:00 2001
From: gecko <>
Date: Mon, 1 May 2000 14:24:03 -0800
Subject: [PATCH] [project @ 2000-05-01 15:24:03 by gecko] Added the
Errors-Email (for setting errors-to email address) All that is left to do
to make service ready is change emails to use template email format. This
error variable might not be used.. the error-to: can be set in the template,
too.
---
Debbugs/Config.pm | 1 +
debbugs-service | 9 +++++----
devel/debbugs.cfg | 1 +
3 files changed, 7 insertions(+), 4 deletions(-)
diff --git a/Debbugs/Config.pm b/Debbugs/Config.pm
index 6d02e134..fe2ceea2 100644
--- a/Debbugs/Config.pm
+++ b/Debbugs/Config.pm
@@ -57,6 +57,7 @@ my %ConfigMap = (
"Long Name" => "project-long",
"Owner Name" => "owner-name",
"Owner Email" => "owner-email",
+ "Errors Email" => "errors-email",
"Owner Webpage" => "owner-webpage",
"Spool Dir" => "spool-dir",
"Work Dir" => "work-dir",
diff --git a/debbugs-service b/debbugs-service
index a9ed4e15..3ca51920 100755
--- a/debbugs-service
+++ b/debbugs-service
@@ -127,10 +127,11 @@ for ( my $procline=0; $procline<=$#body; $procline++)
$lowstate eq 'idle' || print "$lowstate ?\n";
$mergelowstate eq 'idle' || print "$mergelowstate ?\n";
- #get first line
+ #get line
$_= $msg[$procline];
s/\s+$//; #strip ending white space, including newlines
+ #cleanup line
next unless m/\S/; #skip blank lines
next if m/^\s*\#/; #skip comment-only lines
&transcript("> $_\n");
@@ -143,9 +144,9 @@ for ( my $procline=0; $procline<=$#body; $procline++)
} elsif (m/^debug\s+(\d+)$/i && $1 >= 0 && $1 <= 1000)
{ $debug= $1+0;
&transcript("Debug level $debug.\n\n");
- } elsif (m/^(send|get)\s+\#?(\d{2,})$/i) {
- $ref= $2+0; $reffile= $ref; $reffile =~ s,^..,$&/$&,;
- &sendlynxdoc("db/$reffile.html","logs for $gBug#$ref");
+ } elsif (m/^(send|get)\s+\#?(\d{2,})$/i)
+ { $ref= $2+0; $reffile= $ref; $reffile =~ s,^..,$&/$&,;
+ &sendlynxdoc( "db/$reffile.html", "logs for $gBug#$ref" );
} elsif (m/^send-detail\s+\#?(\d+)$/i) {
$ref= $1+0; $reffile= $ref; $reffile =~ s,^..,$&/$&,;
&sendlynxdoc("db/$reffile-b.html","additional logs for $gBug#$ref");
diff --git a/devel/debbugs.cfg b/devel/debbugs.cfg
index 504410cb..8c70e485 100644
--- a/devel/debbugs.cfg
+++ b/devel/debbugs.cfg
@@ -9,6 +9,7 @@ Short Name = "project-short"
Long Name = "project-long"
Owner Name = "owner-name"
Owner Email = "owner-email"
+Errors Email = "errors-email"
Spool Dir = "spool-dir"
Work Dir = "work-dir"
Web Dir = "www-dir"
--
2.39.5