X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Fplack.t;h=4b830a21e35c72b3bf1712d0150ae73b8483a144;hb=d73d783ab2cf14ba28ca63723223d8c85a68cdd5;hp=4fff977352b567671bc562934ff8018bc0d98190;hpb=e39585ee2bdcbeaab7b6bd33b3568021042d0879;p=public-inbox.git diff --git a/t/plack.t b/t/plack.t index 4fff9773..4b830a21 100644 --- a/t/plack.t +++ b/t/plack.t @@ -31,7 +31,7 @@ my $git = PublicInbox::Git->new($inboxdir); my $im = PublicInbox::Import->new($git, 'test', $addr); # ensure successful message delivery { - my $mime = PublicInbox::MIME->new(<new(< To: You Cc: $addr @@ -50,15 +50,15 @@ EOF chomp @ls; # multipart with two text bodies - $mime = mime_load 't/plack-2-txt-bodies.eml'; + $mime = eml_load 't/plack-2-txt-bodies.eml'; $im->add($mime); # multipart with attached patch + filename - $mime = mime_load 't/plack-attached-patch.eml'; + $mime = eml_load 't/plack-attached-patch.eml'; $im->add($mime); # multipart collapsed to single quoted-printable text/plain - $mime = mime_load 't/plack-qp.eml'; + $mime = eml_load 't/plack-qp.eml'; like($mime->body_raw, qr/hi =3D bye=/, 'our test used QP correctly'); $im->add($mime); @@ -77,7 +77,7 @@ Date: Fri, 02 Oct 1993 00:00:00 +0000 :( EOF $crlf =~ s/\n/\r\n/sg; - $im->add(PublicInbox::MIME->new($crlf)); + $im->add(PublicInbox::Eml->new($crlf)); $im->done; } @@ -209,6 +209,10 @@ test_psgi($app, sub { my $res = $cb->(GET($pfx . '/blah@example.com/raw')); is(200, $res->code, 'success response received for /*/raw'); like($res->content, qr!^From !sm, "mbox returned"); + + $res = $cb->(GET($pfx . '/blah@example.com/t.mbox.gz')); + is(501, $res->code, '501 when overview missing'); + like($res->content, qr!\bOverview\b!, 'overview omission noted'); }); # legacy redirects