X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Farg_constraints.t;h=8d74aa87d131f845ce51d64147de5b19b054dec6;hp=a1cd3fd8b5bae223253812fea7989d52e88be2d7;hb=70949f28d6d56c8c882cd937b9c3be5e04aaba62;hpb=aef0cb5dc1b5dbadba8f6345587ea2012011108f diff --git a/t/arg_constraints.t b/t/arg_constraints.t index a1cd3fd..8d74aa8 100644 --- a/t/arg_constraints.t +++ b/t/arg_constraints.t @@ -141,10 +141,11 @@ BEGIN { sub chain_base2 :Chained(/) CaptureArgs(1) { } - sub chained_zero_post2 :POST Chained(chain_base2) PathPart('') Args(0) { $_[1]->res->body('chained_zero_post2') } + sub chained_zero_again : Chained(chain_base2) PathPart('') Args(0) { $_[1]->res->body('chained_zero_again') } + sub chained_zero_post2 : Chained(chain_base2) PathPart('') Args(0) { $_[1]->res->body('chained_zero_post2') } sub chained_zero2 : Chained(chain_base2) PathPart('') Args(0) { $_[1]->res->body('chained_zero2') } - sub chained_zero_post3 :POST Chained(chain_base2) PathPart('') Args(1) { $_[1]->res->body('chained_zero_post3') } + sub chained_zero_post3 : Chained(chain_base2) PathPart('') Args(1) { $_[1]->res->body('chained_zero_post3') } sub chained_zero3 : Chained(chain_base2) PathPart('') Args(1) { $_[1]->res->body('chained_zero3') } @@ -321,43 +322,35 @@ SKIP: { is $res->content, 'finally2'; } -=over - -| /chain_base/* | /chain_base (1) | -| | => /chained_zero (0) | -| /chain_base/* | /chain_base (1) | -| | => POST /chained_zero_post (0) - -=cut { my $res = request PUT '/chain_base2/capture/1'; - is $res->content, 'chained_zero3'; + is $res->content, 'chained_zero3', "request PUT '/chain_base2/capture/1'"; } { my $res = request '/chain_base2/capture/1'; - is $res->content, 'chained_zero3'; + is $res->content, 'chained_zero3', "request '/chain_base2/capture/1'"; } { my $res = request POST '/chain_base2/capture/1'; - is $res->content, 'chained_zero3'; + is $res->content, 'chained_zero3', "request POST '/chain_base2/capture/1'"; } { my $res = request PUT '/chain_base2/capture'; - is $res->content, 'chained_zero2'; + is $res->content, 'chained_zero2', "request PUT '/chain_base2/capture'"; } { my $res = request '/chain_base2/capture'; - is $res->content, 'chained_zero2'; + is $res->content, 'chained_zero2', "request '/chain_base2/capture'"; } { my $res = request POST '/chain_base2/capture'; - is $res->content, 'chained_zero2'; + is $res->content, 'chained_zero2', "request POST '/chain_base2/capture'"; } =over