From: Eric Wong <e@80x24.org>
Date: Fri, 4 Jan 2019 08:55:04 +0000 (+0000)
Subject: t/cgi.t: remove redundant redirect check
X-Git-Tag: v1.2.0~433
X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=commitdiff_plain;h=683634696f7704fdbb83100ca3912a9c20f99823

t/cgi.t: remove redundant redirect check

t/plack.t already has the same test.
---

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';