X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Flib%2FTestApp%2FController%2FAction%2FChildOf.pm;fp=t%2Flib%2FTestApp%2FController%2FAction%2FChildOf.pm;h=377c3d8b707c6ff3bb3709ea8d3f8ff34f871703;hp=2bb2818bbea6e04dff811e2b4f663828b8a24dec;hb=922c58d694a7e5a98f428332abac06587815de79;hpb=a7edfd938f5837127f3d455d8cc7e0204f4b3ba4 diff --git a/t/lib/TestApp/Controller/Action/ChildOf.pm b/t/lib/TestApp/Controller/Action/ChildOf.pm index 2bb2818..377c3d8 100644 --- a/t/lib/TestApp/Controller/Action/ChildOf.pm +++ b/t/lib/TestApp/Controller/Action/ChildOf.pm @@ -7,14 +7,26 @@ use base qw/Catalyst::Controller/; sub begin :Private { } -sub foo :PathPart('childof/foo') :Captures(1) :ChildOf('/') { } +sub foo :PathPart('childof/foo') :Captures(1) :ChildOf('/') { } +sub foo2 :PathPart('childof/foo2') :Captures(2) :ChildOf('/') { } sub bar :PathPart('childof/bar') :ChildOf('/') { } -sub endpoint :PathPart('end') :ChildOf('/action/childof/foo') :Args(1) { } +sub endpoint :PathPart('end') :ChildOf('/action/childof/foo') :Args(1) { } +sub endpoint2 :PathPart('end2') :ChildOf('/action/childof/foo2') :Args(2) { } sub finale :ChildOf('bar') :Args { } +sub one :PathPart('childof/one') :ChildOf('/') :Captures(1) { } +sub two :PathPart('two') :ChildOf('/action/childof/one') :Captures(2) { } + +sub three_end :PathPart('three') :ChildOf('two') :Args(3) { } +sub one_end :PathPart('childof/one') :ChildOf('/') :Args(1) { } +sub two_end :PathPart('two') :ChildOf('one') :Args(2) { } + +sub multi1 :PathPart('childof/multi') :ChildOf('/') :Args(1) { } +sub multi2 :PathPart('childof/multi') :ChildOf('/') :Args(2) { } + sub end :Private { my ($self, $c) = @_; my $out = join('; ', map { join(', ', @$_) }