diff options
author | Eric Wong <e@yhbt.net> | 2020-04-25 05:52:22 +0000 |
---|---|---|
committer | Eric Wong <e@yhbt.net> | 2020-04-26 07:03:14 +0000 |
commit | e39585ee2bdcbeaab7b6bd33b3568021042d0879 (patch) | |
tree | b130b0ce73d8ce9624424c4de6999481ab96439d /t/psgi_attach.t | |
parent | 5d8dbb4aca5afcc6b98a4d951f03003fb7eaf356 (diff) | |
download | public-inbox-e39585ee2bdcbeaab7b6bd33b3568021042d0879.tar.gz |
tests: remove Email::MIME->create use entirely
Replace them with .eml files generated with the help of Email::MIME, but without some extraneous and unnecessary headers, and strip mime_load down to just loading files. This will give us more freedom to experiment with other mail libraries which may be more correct, better maintained, use less memory and/or be faster than Email::MIME.
Diffstat (limited to 't/psgi_attach.t')
-rw-r--r-- | t/psgi_attach.t | 37 |
1 files changed, 1 insertions, 36 deletions
diff --git a/t/psgi_attach.t b/t/psgi_attach.t index 0dde9323..af0fbdd3 100644 --- a/t/psgi_attach.t +++ b/t/psgi_attach.t @@ -3,7 +3,6 @@ use strict; use warnings; use Test::More; -use Email::MIME; use PublicInbox::TestCommon; my ($tmpdir, $for_destroy) = tmpdir(); my $maindir = "$tmpdir/main.git"; @@ -30,41 +29,7 @@ $im->init_bare; my $b64 = "b64\xde\xad\xbe\xef\n"; my $txt = "plain\ntext\npass\nthrough\n"; my $dot = "dotfile\n"; - my $mime = mime_load 't/psgi_attach.eml', sub { - my $parts = [ - Email::MIME->create( - attributes => { - filename => 'queue-pee', - content_type => 'text/plain', - encoding => 'quoted-printable' - }, - body => $qp), - Email::MIME->create( - attributes => { - filename => 'bayce-sixty-four', - content_type => 'appication/octet-stream', - encoding => 'base64', - }, - body => $b64), - Email::MIME->create( - attributes => { - filename => 'noop.txt', - content_type => 'text/plain', - }, - body => $txt), - Email::MIME->create( - attributes => { - filename => '.dotfile', - content_type => 'text/plain', - }, - body => $dot), - ]; - Email::MIME->create( - parts => $parts, - header_str => [ From => 'root@z', 'Message-Id' => '<Z@B>', - Subject => 'hi'] - )}; # mime_load sub - $im->add($mime); + $im->add(mime_load('t/psgi_attach.eml')); $im->done; my $www = PublicInbox::WWW->new($config); |