diff options
author | Eric Wong (Contractor, The Linux Foundation) <e@80x24.org> | 2018-02-23 18:33:34 +0000 |
---|---|---|
committer | Eric Wong (Contractor, The Linux Foundation) <e@80x24.org> | 2018-02-28 18:53:29 +0000 |
commit | aece46bdf0af3dce045797c2e897a0088e4324a5 (patch) | |
tree | 1d5b0050d24e4c101be3cc806b890082bbdedf86 /scripts/import_slrnspool | |
parent | 18d3c1d54b96e6410c108ccac63e926a6451b18b (diff) | |
download | public-inbox-aece46bdf0af3dce045797c2e897a0088e4324a5.tar.gz |
It works around some bugs in older Email::MIME which we'll find useful.
Diffstat (limited to 'scripts/import_slrnspool')
-rwxr-xr-x | scripts/import_slrnspool | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/import_slrnspool b/scripts/import_slrnspool index 5158460b..7b6c9ab0 100755 --- a/scripts/import_slrnspool +++ b/scripts/import_slrnspool @@ -11,7 +11,7 @@ use strict; use warnings; use PublicInbox::Config; -use Email::MIME; +use PublicInbox::MIME; use PublicInbox::Import; use PublicInbox::Git; sub usage { "Usage:\n".join('',grep(/\t/, `head -n 10 $0`)) } @@ -58,7 +58,7 @@ for (; $exit == 0 && $n < $max; $n++) { open(my $fh, '<', $fn) or next; $max = $n + $max_gap; - my $mime = Email::MIME->new(eval { local $/; <$fh> }); + my $mime = PublicInbox::MIME->new(eval { local $/; <$fh> }); my $hdr = $mime->header_obj; # gmane rewrites Received headers, which increases spamminess |