From 4e62cce8959480a76bdeb086049b25c8a64898f9 Mon Sep 17 00:00:00 2001
From: doogie <>
Date: Sun, 18 Mar 2001 05:13:52 -0800
Subject: [PATCH] [project @ 2001-03-18 05:13:52 by doogie] Use Resent-From: if
 From: doesn't exist.

---
 scripts/process.in | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/scripts/process.in b/scripts/process.in
index f3fb4b83..27e2505a 100755
--- a/scripts/process.in
+++ b/scripts/process.in
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: process.in,v 1.25 2001/03/18 05:06:00 doogie Exp $
+# $Id: process.in,v 1.26 2001/03/18 05:13:52 doogie Exp $
 #
 # Usage: process nn
 # Temps:  incoming/Pnn
@@ -109,6 +109,9 @@ $fwd .= join("\n",@msg[$i..$#msg]);
 
 print DEBUG "***\n$fwd\n***\n";
 
+if (defined $header{'resent-from'} && !defined $header{'from'}) {
+    $header{'from'} = $header{'resent-from'};
+}
 defined($header{'from'}) || &quit("no From header");
 $replyto= defined($header{'reply-to'}) ? $header{'reply-to'} : $header{'from'};
 
-- 
2.39.5