use strict;
use warnings;
-use Test::More tests => 4;
+use Test::More;
use Test::Exception;
-
{
package My::Role;
use Moose::Role;
sub baz { 'Foo::baz' }
- __PACKAGE__->meta->make_immutable(debug => 0);
+ __PACKAGE__->meta->make_immutable(debug => 0);
}
my $foo = Foo->new;
is($foo->baz, 'My::Role::baz(Foo::baz)', '... got the right value');
-
+done_testing;