about summary refs log tree commit homepage
path: root/t
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2019-01-04 08:55:04 +0000
committerEric Wong <e@80x24.org>2019-01-04 08:55:04 +0000
commit683634696f7704fdbb83100ca3912a9c20f99823 (patch)
treedba45e0b28046784e7c6d037cfa96329603d7352 /t
parent6c02bc3c3035734bb458305a312d73df2d446c11 (diff)
downloadpublic-inbox-683634696f7704fdbb83100ca3912a9c20f99823.tar.gz
t/plack.t already has the same test.
Diffstat (limited to 't')
-rw-r--r--t/cgi.t8
-rw-r--r--t/plack.t3
2 files changed, 2 insertions, 9 deletions
diff --git a/t/cgi.t b/t/cgi.t
index ac2c69fc..06519c3e 100644
--- a/t/cgi.t
+++ b/t/cgi.t
@@ -195,14 +195,6 @@ EOF
         }
 }
 
-# redirect list-name-only URLs
-{
-        local $ENV{HOME} = $home;
-        my $res = cgi_run("/test");
-        like($res->{head}, qr/Status: 301 Moved/, "redirected status");
-        like($res->{head}, qr!/test/!, "redirected with slash");
-}
-
 done_testing();
 
 sub run_with_env {
diff --git a/t/plack.t b/t/plack.t
index 7eb7d7f2..70cd20e5 100644
--- a/t/plack.t
+++ b/t/plack.t
@@ -92,7 +92,8 @@ EOF
                 my $to = "$from/";
                 my $res = $cb->(GET($from));
                 is(301, $res->code, 'is permanent redirect');
-                is($to, $res->header('Location'), 'redirect location matches');
+                is($to, $res->header('Location'),
+                        'redirect location matches with trailing slash');
         });
 
         my $pfx = 'http://example.com/test';