X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Fpsgi_mount.t;fp=t%2Fpsgi_mount.t;h=48d8e5c0847f0f83cf8de211d19ebd16cca5ee2a;hb=1bf653ad139bf7bb3d853ab0b5eae3eaa1b13a95;hp=dac62c1a2962a48cfcb77078888c3742f843e1be;hpb=ac4f951e03eaf635c8dd20a6f42bfc71b0011412;p=public-inbox.git
diff --git a/t/psgi_mount.t b/t/psgi_mount.t
index dac62c1a..48d8e5c0 100644
--- a/t/psgi_mount.t
+++ b/t/psgi_mount.t
@@ -67,11 +67,9 @@ test_psgi($app, sub {
$res = $cb->(GET('/a/test/blah%40example.com/raw'));
is($res->code, 200, 'OK with URLMap mount');
- like($res->content, qr!^List-Archive: !m,
- 'List-Archive set in /raw mboxrd');
like($res->content,
- qr!^Archived-At: !m,
- 'Archived-At set in /raw mboxrd');
+ qr/^Message-Id: \n/sm,
+ 'headers appear in /raw');
# redirects
$res = $cb->(GET('/a/test/m/blah%40example.com.html'));
@@ -94,12 +92,8 @@ SKIP: {
my $gz = $res->content;
my $raw;
IO::Uncompress::Gunzip::gunzip(\$gz => \$raw);
- like($raw, qr!^List-Archive: !m,
- 'List-Archive set in /t.mbox.gz mboxrd');
- like($raw,
- qr!^Archived-At:\x20
- !mx,
- 'Archived-At set in /t.mbox.gz mboxrd');
+ like($raw, qr!^Message-Id:\x20\n!sm,
+ 'headers appear in /t.mbox.gz mboxrd');
});
}