switch read-only Email::Simple users to Eml

[public-inbox.git] / lib / PublicInbox / MboxGz.pm

diff --git a/lib/PublicInbox/MboxGz.pm b/lib/PublicInbox/MboxGz.pm
index e506de3da0ea52566e958ab8ac09462d8c1217db..f7fc4afc147fab95da0df4f4ce483f78f942fa68 100644 (file)
--- 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}),