X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=t%2Fnntp.t;h=35fb55b42ccfec723a2dfa734222d8aedd648b9c;hp=ff72ec6a001cabc92d725154608a7bda2956702a;hb=e6b7a7f5f70fb89a54ff158bc6c8b564149947e5;hpb=62d1a4da996bd9a664be954f71f78fe052f9df16 diff --git a/t/nntp.t b/t/nntp.t index ff72ec6a..35fb55b4 100644 --- a/t/nntp.t +++ b/t/nntp.t @@ -4,6 +4,7 @@ use strict; use warnings; use Test::More; use PublicInbox::TestCommon; +use PublicInbox::MIME; require_mods(qw(DBD::SQLite Data::Dumper)); use_ok 'PublicInbox::NNTP'; use_ok 'PublicInbox::Inbox'; @@ -96,7 +97,6 @@ use_ok 'PublicInbox::Inbox'; } { # test setting NNTP headers in HEAD and ARTICLE requests - require Email::MIME; my $u = 'https://example.com/a/'; my $ng = PublicInbox::Inbox->new({ name => 'test', inboxdir => 'test.git', @@ -107,7 +107,7 @@ use_ok 'PublicInbox::Inbox'; url => [ '//example.com/a' ]}); is($ng->base_url, $u, 'URL expanded'); my $mid = 'a@b'; - my $mime = Email::MIME->new("Message-ID: <$mid>\r\n\r\n"); + my $mime = PublicInbox::MIME->new("Message-ID: <$mid>\r\n\r\n"); my $hdr = $mime->header_obj; my $mock_self = { nntpd => { grouplist => [], servername => 'example.com' } };