From: doogie <> Date: Sun, 18 Mar 2001 13:13:52 +0000 (-0800) Subject: [project @ 2001-03-18 05:13:52 by doogie] X-Git-Tag: release/2.6.0~1138 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=4e62cce8959480a76bdeb086049b25c8a64898f9;p=debbugs.git [project @ 2001-03-18 05:13:52 by doogie] Use Resent-From: if From: doesn't exist. --- 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'};