From 683634696f7704fdbb83100ca3912a9c20f99823 Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Fri, 4 Jan 2019 08:55:04 +0000 Subject: t/cgi.t: remove redundant redirect check t/plack.t already has the same test. --- t/cgi.t | 8 -------- t/plack.t | 3 ++- 2 files changed, 2 insertions(+), 9 deletions(-) (limited to 't') 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'; -- cgit v1.2.3-24-ge0c7