24 my ($role, $class) = @_;
25 Moose::Util::MetaRole::apply_metaroles(
28 class => ['Bar::Class'],
37 Moose::Util::MetaRole::apply_metaroles(
40 application_to_class => ['Bar::ToClass'],
48 use Moose -traits => 'Foo';
53 use Moose -traits => 'Bar';
54 { our $TODO; local $TODO = "no idea what's going on here";
55 ::lives_ok { extends 'Parent' };