X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=lib%2FPublicInbox%2FTestCommon.pm;h=d952ee6d97715fc644b1dcf0e663d977821c8413;hp=978c3cd7bafaf4a1cc82a7a78724296453f49cbd;hb=0283273a14e1871955f6a9132f4f3f7884ec8a3f;hpb=fd966061df6a61104935984bed7c28a461a124ff diff --git a/lib/PublicInbox/TestCommon.pm b/lib/PublicInbox/TestCommon.pm index 978c3cd7..d952ee6d 100644 --- a/lib/PublicInbox/TestCommon.pm +++ b/lib/PublicInbox/TestCommon.pm @@ -8,7 +8,6 @@ use parent qw(Exporter); use Fcntl qw(FD_CLOEXEC F_SETFD F_GETFD :seek); use POSIX qw(dup2); use IO::Socket::INET; -use PublicInbox::MIME; # temporary our @EXPORT = qw(tmpdir tcp_server tcp_connect require_git require_mods run_script start_script key2sub xsys xqx mime_load eml_load); @@ -23,7 +22,7 @@ sub mime_load ($) { sub eml_load ($) { my ($path, $cb) = @_; open(my $fh, '<', $path) or die "open $path: $!"; - binmode $fh; + require PublicInbox::Eml; PublicInbox::Eml->new(\(do { local $/; <$fh> })); }