about summary refs log tree commit homepage
path: root/t
diff options
context:
space:
mode:
Diffstat (limited to 't')
-rw-r--r--t/cgi.t12
-rw-r--r--t/plack.t7
2 files changed, 5 insertions, 14 deletions
diff --git a/t/cgi.t b/t/cgi.t
index 06519c3e..382c21fc 100644
--- 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 70cd20e5..1a719b41 100644
--- 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 {