use strict;
use warnings;
-use Test::More tests => 5;
+use Test::More;
# remove this when CheckedUtilExports croaks instead of carps
$SIG{__WARN__} = sub { die @_ };
use MooseX::Types -declare => ['Foo'];
use MooseX::Types::Moose 'Str';
- role_type 'mtfnpy';
+ role_type 'ypnftm';
- coerce mtfnpy =>
+ coerce ypnftm =>
from Str,
- via { bless \$_, 'mtfnpy' };
+ via { bless \$_, 'ypnftm' };
1;
};
eval $role_type;
is $@, '', "declared role_types don't throw error";
+
+done_testing();