From 4d23c229a250dde7ad1a46cab52448f07f153f3e Mon Sep 17 00:00:00 2001
From: "martin f. krafft" <madduck@madduck.net>
Date: Tue, 16 Feb 2010 04:01:15 +0100
Subject: [PATCH] enable replacing reply-to with m-f-t

---
 procmail/listquirks | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/procmail/listquirks b/procmail/listquirks
index 6ceeb00..8fe4f51 100644
--- a/procmail/listquirks
+++ b/procmail/listquirks
@@ -13,6 +13,19 @@
   LOG="listquirks:  adding M-F-T header for message on list $EQ_TO$NL"
   :0 fw
   |$FORMAIL -A "Mail-Followup-To: $CORRESPONDENTS"
+  CORRESPONDENTS
+}
+
+:0 E
+* ! DEST ?? .
+* ? echo "$EQ_TO" | $EGREP -qif $CONF/replytolists
+* $^Reply-To: $EQ_TO
+{
+  CORRESPONDENTS=`formail -cxTo: -xCc: -xFrom: -xReply-To: | tr -s '\n' ,`
+  LOG="listquirks:  replacing Reply-To with M-F-T for message to list $EQ_TO$NL"
+  :0 fw
+  |$FORMAIL -I Reply-To: -A "Mail-Followup-To: $CORRESPONDENTS"
+  CORRESPONDENTS
 }
 
 # vim:ft=procmail
-- 
2.39.5