X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestGitalist.pm;fp=t%2Flib%2FTestGitalist.pm;h=dcdc539299017c42b35ce3f98737e7f93deca0b3;hb=2d376b54de7abb49a0b8d80f996c698933503d22;hp=05a20640efdb67b1dfe0c1572dba6713443a7be7;hpb=aebe9a0e6beff3cb67fcfd138899ce91e91d61b9;p=catagits%2FGitalist.git diff --git a/t/lib/TestGitalist.pm b/t/lib/TestGitalist.pm index 05a2064..dcdc539 100644 --- a/t/lib/TestGitalist.pm +++ b/t/lib/TestGitalist.pm @@ -73,7 +73,7 @@ sub test_uri { my $request = "/$uri"; $request .= "?$qs" if defined $qs; my $response = request($request); - ok($response->is_success, "ok $request"); + ok($response->is_success || $response->is_redirect, "ok $request"); if (MECH) { my $res = MECH()->get($request); ok $res->is_success, "ok mech $request (" . $res->code . ')';