X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scripts%2Fprocess;h=265bd5835b6fb2f96e671fef5895cd409b7401c4;hb=ea162515d6f096215237c46b55f9d5d3e370d02f;hp=3da8f983c4a13ea773fe808a6f8136018b918a9d;hpb=1b1055f4cf36f98a083b6fde3df7dda299220840;p=debbugs.git diff --git a/scripts/process b/scripts/process index 3da8f98..265bd58 100755 --- a/scripts/process +++ b/scripts/process @@ -241,7 +241,7 @@ for my $phline (@bodylines) push @control_bits,$fv; } else { # Don't lc owner or forwarded - $fv = lc $fv unless $fn =~ /^(?:owner|forwarded|usertags|version|source-version)$/; + $fv = lc $fv unless $fn =~ /^(?:owner|forwarded|usertags|version|source-version|done)$/; $pheader{$fn} = $fv; } print {$debugfh} ">$fn~$fv<\n"; @@ -390,7 +390,7 @@ if ($codeletter eq 'D' || $codeletter eq 'F') } $receivedat= "done\@$gEmailDomain"; $markaswhat= 'done'; - $set_done= $header{'from'}; + $set_done= $pheader{'done'} // $header{'from'}; if ( length( $gListDomain ) > 0 && length( $gDoneList ) > 0 ) { $generalcc= "$gDoneList\@$gListDomain"; push @generalcc, "$gDoneList\@$gListDomain";