diff options
author | Eric Wong (Contractor, The Linux Foundation) <e@80x24.org> | 2018-03-19 08:14:57 +0000 |
---|---|---|
committer | Eric Wong (Contractor, The Linux Foundation) <e@80x24.org> | 2018-03-19 08:16:34 +0000 |
commit | 41082521a8091b733eb61f8bb9f0e9f76ed4a4cb (patch) | |
tree | e31111a1a6d69aa36e1bcd91ddbe893fa0024470 /scripts | |
parent | 24294059123d4edd9e31f211d72c641a5d1a0d72 (diff) | |
download | public-inbox-41082521a8091b733eb61f8bb9f0e9f76ed4a4cb.tar.gz |
Perhaps we should filter these headers out in Import
Diffstat (limited to 'scripts')
-rw-r--r-- | scripts/import_vger_from_mbox | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/scripts/import_vger_from_mbox b/scripts/import_vger_from_mbox index 6a00fae3..1edb987a 100644 --- a/scripts/import_vger_from_mbox +++ b/scripts/import_vger_from_mbox @@ -8,6 +8,7 @@ use PublicInbox::MIME; use PublicInbox::Inbox; use PublicInbox::V2Writable; use PublicInbox::Import; +use PublicInbox::MDA; my $usage = "usage: $0 NAME EMAIL DIR <MBOX\n"; my $dry_run; my $version = 2; @@ -57,6 +58,7 @@ sub do_add ($$) { } $mime = $vger->scrub($mime); return unless $im; + $mime->header_set($_) foreach @PublicInbox::MDA::BAD_HEADERS; $im->add($mime) or warn "duplicate: ", $mime->header_obj->header_raw('Message-ID'), "\n"; |