better docs for params and complex string test
[catagits/CatalystX-Declare.git] / t / 022_parameterized_roles.t
CommitLineData
c2a8165b 1#!/usr/bin/env perl
2use strict;
3use warnings;
4
5use FindBin;
6use lib "$FindBin::Bin/lib";
7
8use Test::More;
9use Catalyst::Test 'TestApp';
10
2387a55a 11is get('/param/greet'), 'foo:foo', 'parameterized role was consumed correctly';
8d66ec34 12is get('/param/somebase/dynabase'), 'under somebase', 'dynamic base via parameter';
13is get('/param/somebase/somepart'), 'under somebase as somepart', 'dynamic base and path part via parameter';
14is get('/param/somebase/scoped'), 'scoped under somebase', 'dynamic base in under scope via parameter';
3601c77d 15is get('/param/somebase/somepart/deep'), 'somepart/deep under somebase', 'more complex strings';
c2a8165b 16
17done_testing;