t/cgi.t: remove atom.xml test

It is redundant with what is in t/plack.t

diff --git a/t/cgi.t b/t/cgi.t
index 06519c3e6164e29bed022df425aebdf8fe21f266..382c21fc52e263da108eb6316498799b98f6d563 100644 (file)
--- a/t/cgi.t
+++ b/t/cgi.t
@@ -109,18 +109,6 @@ EOF
        is($res->{body}, substr($orig, 5), 'partial body OK past end');
 }
 
-# atom feeds
-{
-       local $ENV{HOME} = $home;
-       my $res = cgi_run("/test/atom.xml");
-       like($res->{body}, qr/<title>test for public-inbox/,
-               "set title in XML feed");
-       like($res->{body},
-               qr!http://test\.example\.com/test/blah\@example\.com/!,
-               "link id set");
-       like($res->{body}, qr/what\?/, "reply included");
-}
-
 # message-id pages
 {
        local $ENV{HOME} = $home;

diff --git a/t/plack.t b/t/plack.t
index 70cd20e53306ab5bdfec34ac2d99fc1bf3c91f45..1a719b41c6f2f7c4ffb73e03dacce3f8fcf93475 100644 (file)
--- a/t/plack.t
+++ b/t/plack.t
@@ -135,9 +135,12 @@ EOF
                my ($cb) = @_;
                my $res = $cb->(GET($pfx . '/atom.xml'));
                is(200, $res->code, 'success response received for atom');
-               like($res->content,
-                       qr!link\s+href="\Q$pfx\E/blah\@example\.com/"!s,
+               my $body = $res->content;
+               like($body, qr!link\s+href="\Q$pfx\E/blah\@example\.com/"!s,
                        'atom feed generated correct URL');
+               like($body, qr/<title>test for public-inbox/,
+                       "set title in XML feed");
+               like($body, qr/zzzzzz/, 'body included');
        });
 
        test_psgi($app, sub {