use strict;
use warnings;
-use Test::More tests => 2;
+use Test::More;
use Test::Exception;
-BEGIN {
- use_ok('Moose');
-}
{
package My::Role;
{
package My::Class;
use Moose;
-
+
::throws_ok {
extends 'My::Role';
- } qr/You cannot inherit from a Moose Role \(My\:\:Role\)/,
+ } qr/You cannot inherit from a Moose Role \(My\:\:Role\)/,
'... this croaks correctly';
}
+
+done_testing;