diff options
Diffstat (limited to 't/bugs/attribute_trait_parameters.t')
-rw-r--r-- | t/bugs/attribute_trait_parameters.t | 46 |
1 files changed, 46 insertions, 0 deletions
diff --git a/t/bugs/attribute_trait_parameters.t b/t/bugs/attribute_trait_parameters.t new file mode 100644 index 0000000..cd053d1 --- /dev/null +++ b/t/bugs/attribute_trait_parameters.t @@ -0,0 +1,46 @@ +use strict; +use warnings; + +use Test::More; +use Test::Requires 'Test::Output'; # skip all if not installed + +{ + package R; + use Moose::Role; + + sub method { } +} + +{ + package C; + use Moose; + + ::stderr_is{ + has attr => ( + is => 'ro', + traits => [ + R => { ignored => 1 }, + ], + ); + } q{}, 'no warning with foreign parameterized attribute traits'; + + ::stderr_is{ + has alias_attr => ( + is => 'ro', + traits => [ + R => { -alias => { method => 'new_name' } }, + ], + ); + } q{}, 'no warning with -alias parameterized attribute traits'; + + ::stderr_is{ + has excludes_attr => ( + is => 'ro', + traits => [ + R => { -excludes => ['method'] }, + ], + ); + } q{}, 'no warning with -excludes parameterized attribute traits'; +} + +done_testing; |