X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F022_parameterized_roles.t;h=edfcfa15552877eba5fe14f0262a5bb0f2cdc42f;hb=dd2759b0c9ddd9e0c3953c67cf2213dd2f01e380;hp=11a125b84a4812a8890307935227b0c4622b9c54;hpb=c2a8165b6661f2e08d1b9a179c9e615ba91d8220;p=catagits%2FCatalystX-Declare.git diff --git a/t/022_parameterized_roles.t b/t/022_parameterized_roles.t index 11a125b..edfcfa1 100644 --- a/t/022_parameterized_roles.t +++ b/t/022_parameterized_roles.t @@ -8,9 +8,12 @@ use lib "$FindBin::Bin/lib"; use Test::More; use Catalyst::Test 'TestApp'; -TODO: { - local $TODO = 'MooseX::MethodAttributes needs to allow this'; - is get('/param/greet'), 'foo:foo', 'parameterized role was consumed correctly'; -} +is get('/param/greet'), 'foo:foo', 'parameterized role was consumed correctly'; +is get('/param/somebase/dynabase'), 'under somebase', 'dynamic base via parameter'; +is get('/param/somebase/somepart'), 'under somebase as somepart', 'dynamic base and path part via parameter'; +is get('/param/somebase/scoped'), 'scoped under somebase', 'dynamic base in under scope via parameter'; +is get('/param/somebase/somepart/deep'), 'somepart/deep under somebase', 'more complex strings'; +is get('/param/somebase/someaction'), 'someaction action', 'dynamic action name'; +is get('/param/somebase/actionalias'), 'someaction action', 'dynamic action name in method call'; done_testing;