X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcatalyst-controller-rest.t;h=ec39392fda27fcf73342b881dcd87a7f806a4581;hb=refs%2Ftags%2Fv1.15;hp=7b4555ce483a77e2a51f3a9077efaf7c1b8196a2;hpb=9b5736d5d906e63a9697f4b2a3a882a9e853ecd6;p=catagits%2FCatalyst-Action-REST.git diff --git a/t/catalyst-controller-rest.t b/t/catalyst-controller-rest.t index 7b4555c..ec39392 100644 --- a/t/catalyst-controller-rest.t +++ b/t/catalyst-controller-rest.t @@ -41,6 +41,11 @@ is_deeply Load( $res->content ), "... status found message"; is $res->header('Location'), '/rest', "...location of what was found"; +ok $res = request( $t->get( url => '/rest/test_status_see_other' ) ); +is $res->code, 303, "... status see other"; +is $res->header('Location'), '/rest', "...location to redirect to"; + + ok $res = request( $t->get( url => '/rest/test_status_bad_request' ) ); is $res->code, 400, '... status bad request'; is_deeply Load( $res->content ),