4 use Test::More tests => 3;
8 'MooseX::Role::Parameterized' => 0.23, # skip all if not installed
13 use MooseX::Role::Parameterized;
14 use MooseX::ClassAttribute;
16 parameter foo => (is => 'rw');
21 class_has $p => (is => 'rw');
26 with 'Role' => { foo => 'foo' };
29 ok((my $instance = Class->new), 'instance');
32 $instance->foo('bar');
33 is $instance->foo, 'bar';
34 } 'used class attribute from parameterized role';