diff options
author | Eric Wong (Contractor, The Linux Foundation) <e@80x24.org> | 2018-02-22 17:55:36 +0000 |
---|---|---|
committer | Eric Wong (Contractor, The Linux Foundation) <e@80x24.org> | 2018-02-22 18:31:36 +0000 |
commit | a81ad9c4b1b5d8c2ae8444b6dcb8710bd361f628 (patch) | |
tree | e93f10777c075a9d2ab85376fecc44d36ae65068 | |
parent | 6a5d79ca1d848f1672022e2c5494a182612be375 (diff) | |
download | public-inbox-a81ad9c4b1b5d8c2ae8444b6dcb8710bd361f628.tar.gz |
It is less confusing without the clobber assignment; and PublicInbox::MIME exists to workaround bugs in older Email::MIME (which is in Debian 9 (stretch))
-rw-r--r-- | scripts/import_vger_from_mbox | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/scripts/import_vger_from_mbox b/scripts/import_vger_from_mbox index abc2d37c..13084835 100644 --- a/scripts/import_vger_from_mbox +++ b/scripts/import_vger_from_mbox @@ -46,12 +46,12 @@ my $vger = PublicInbox::Filter::Vger->new; sub do_add ($$) { my ($im, $msg) = @_; $$msg =~ s/(\r?\n)+\z/$1/s; - $msg = Email::MIME->new($$msg); - $msg = $vger->scrub($msg); + my $mime = PublicInbox::MIME->new($msg); + $mime = $vger->scrub($mime); return unless $im; - $im->add($msg) or + $im->add($mime) or warn "duplicate: ", - $msg->header_obj->header_raw('Message-ID'), "\n"; + $mime->header_obj->header_raw('Message-ID'), "\n"; } # asctime: From example@example.com Fri Jun 23 02:56:55 2000 |