File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -206,25 +206,6 @@ ok($res->content, qr|/echo/redirect|);
206206ok($res->previous->is_redirect);
207207ok($res->previous->code, 301);
208208
209- # Let' s test a redirect loop too
210- sub httpd_get_redirect2 { shift -> send_redirect(" /redirect3/" ) }
211- sub httpd_get_redirect3 { shift -> send_redirect(" /redirect2/" ) }
212-
213- $req -> uri(url(" /redirect2" , $base ));
214- $ua -> max_redirect(5);
215- $res = $ua -> request($req );
216-
217- # print $res->as_string;
218- ok($res -> is_redirect);
219- ok($res -> header(" Client-Warning" ), qr / loop detected/ i );
220- ok($res -> redirects, 5);
221-
222- $ua -> max_redirect(0);
223- $res = $ua -> request($req );
224- ok($res -> previous, undef );
225- ok($res -> redirects, 0);
226- $ua -> max_redirect(5);
227-
228209#----------------------------------------------------------------
229210print "Check basic authorization...\n";
230211
You can’t perform that action at this time.
0 commit comments