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=e4a2593d80f4a25d6e6da2cced49ceffabffbb5b;hp=20ff1baf18217d64b73fad55e2944d74a28d79d9;hb=b7791bd714d8a1d41f26bd3a371761ed8ab899cd;hpb=e5604544417cca5a4d837b7220d3f0fdd7767f3a diff --git a/t/arg_constraints.t b/t/arg_constraints.t index 20ff1ba..e4a2593 100644 --- a/t/arg_constraints.t +++ b/t/arg_constraints.t @@ -22,8 +22,8 @@ use HTTP::Request::Common; $c->res->body('many_ints'); } - sub int_priority :Path('priority_test') Args(Int) { $_[1]->res->body('int_priority') } sub any_priority :Path('priority_test') Args(1) { $_[1]->res->body('any_priority') } + sub int_priority :Path('priority_test') Args(Int) { $_[1]->res->body('int_priority') } sub default :Default { my ($self, $c, $int) = @_;