From 4246aa829cef47b9d7a0400e1fe166b319b2f761 Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Sun, 2 Aug 2015 06:35:57 +0000 Subject: public-inbox-learn: preserve headers for ham injection We must inject headers properly for injecting ham, otherwise List-Id headers get dropped. --- public-inbox-learn | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'public-inbox-learn') diff --git a/public-inbox-learn b/public-inbox-learn index db0a1bb3..d3a05abe 100755 --- a/public-inbox-learn +++ b/public-inbox-learn @@ -60,6 +60,7 @@ foreach my $recipient (keys %dests) { # no checking for spam here, we assume the message has # been reviewed by a human at this point: PublicInbox::MDA->set_list_headers($mime, $dst); + my $s = $mime->as_string; local $ENV{GIT_AUTHOR_NAME} = $name; local $ENV{GIT_AUTHOR_EMAIL} = $email; @@ -67,7 +68,7 @@ foreach my $recipient (keys %dests) { # Ham messages are trained when they're marked into # a SEEN state, so this is idempotent: - run([PublicInbox::MDA->cmd, $git_dir], \$in, \$out, \$err); + run([PublicInbox::MDA->cmd, $git_dir], \$s, \$out, \$err); if ($err !~ /CONFLICT/) { $err = 1; } -- cgit v1.2.3-24-ge0c7