X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scripts%2Fprocess;h=228d28ad32fc6166e8c52b9cd025aa0fdbfe8d32;hb=5a93a371c0c14c494f28c226d3be1ff6b0aff367;hp=95d933d7a1caa67e76a3a0d74091a693ea010144;hpb=606b62e08af2e41dfac78188d84d4690a9aa1ef5;p=debbugs.git diff --git a/scripts/process b/scripts/process index 95d933d..228d28a 100755 --- a/scripts/process +++ b/scripts/process @@ -180,8 +180,8 @@ for my $hdr (@headerlines) { $_ = $hdr; s/\n\s/ /g; 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-/i; + my $ins = !m/^(?:(?:subject|reply-to|return-path|mail-followup-to): + |From\s|X-Debbugs-)/xi; $fwd .= encode_utf8($hdr)."\n" if $ins; # print {$debugfh} ">$_<\n"; if (s/^(\S+):\s*//) {