'under' and 'as' are parameterizable
[catagits/CatalystX-Declare.git] / t / 022_parameterized_roles.t
index 5ddab0a..6cdadc8 100644 (file)
@@ -9,5 +9,8 @@ use Test::More;
 use Catalyst::Test 'TestApp';
 
 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';
 
 done_testing;