X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=lib%2FPublicInbox%2FMboxGz.pm;h=f7fc4afc147fab95da0df4f4ce483f78f942fa68;hp=e506de3da0ea52566e958ab8ac09462d8c1217db;hb=3b1b7abf814dbc7f2a737b2ca0e12b0fa518ff44;hpb=57af9c8d0bedafac3267b5b42f963bb8aa5c2ea1 diff --git a/lib/PublicInbox/MboxGz.pm b/lib/PublicInbox/MboxGz.pm index e506de3d..f7fc4afc 100644 --- a/lib/PublicInbox/MboxGz.pm +++ b/lib/PublicInbox/MboxGz.pm @@ -3,7 +3,7 @@ package PublicInbox::MboxGz; use strict; use warnings; -use Email::Simple; +use PublicInbox::Eml; use PublicInbox::Hval qw/to_filename/; use PublicInbox::Mbox; use Compress::Raw::Zlib qw(Z_FINISH Z_OK); @@ -41,7 +41,7 @@ sub getline { my $buf = delete($self->{buf}); while (my $smsg = $self->{cb}->($ctx)) { my $mref = $ctx->{-inbox}->msg_by_smsg($smsg) or next; - my $h = Email::Simple->new($mref)->header_obj; + my $h = PublicInbox::Eml->new($mref)->header_obj; my $err = $gz->deflate( PublicInbox::Mbox::msg_hdr($ctx, $h, $smsg->{mid}),