From 8b5cdfbc0f0fbb50c2862d998eb8e447d610a013 Mon Sep 17 00:00:00 2001
From: cjwatson <>
Date: Tue, 25 Mar 2003 20:13:11 -0800
Subject: [PATCH] [project @ 2003-03-25 20:13:11 by cjwatson] Exit silently if
 a mail loop is detected, rather than spamming $gMaintainerEmail with "looping
 detected" messages and leaving droppings all over the incoming queue. These
 are rather frequent due to Reply-To: headers pointing back to the bug.

---
 scripts/process.in | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/scripts/process.in b/scripts/process.in
index a1aa8c21..c5c86148 100755
--- a/scripts/process.in
+++ b/scripts/process.in
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: process.in,v 1.59 2003/01/28 23:52:08 cjwatson Exp $
+# $Id: process.in,v 1.60 2003/03/25 20:13:11 cjwatson Exp $
 #
 # Usage: process nn
 # Temps:  incoming/Pnn
@@ -97,8 +97,7 @@ if ($entity and $entity->head->tags) {
 for my $hdr (@headerlines) {
     $_ = $hdr;
     s/\n\s/ /g;
-    &quit("looping detected")
-	if m/^x-loop: (\S+)$/i && $1 eq "$gMaintainerEmail";
+    &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/^received:/i;
     $fwd .= $hdr."\n" if $ins;
-- 
2.39.5