diff options
Diffstat (limited to 't/bugs/inheriting_from_roles.t')
-rw-r--r-- | t/bugs/inheriting_from_roles.t | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/t/bugs/inheriting_from_roles.t b/t/bugs/inheriting_from_roles.t new file mode 100644 index 0000000..093864b --- /dev/null +++ b/t/bugs/inheriting_from_roles.t @@ -0,0 +1,21 @@ +use strict; +use warnings; + +use Test::More; +use Test::Fatal; + + +{ + package My::Role; + use Moose::Role; +} +{ + package My::Class; + use Moose; + + ::like( ::exception { + extends 'My::Role'; + }, qr/You cannot inherit from a Moose Role \(My\:\:Role\)/, '... this croaks correctly' ); +} + +done_testing; |