if($spec->{INIT_META}){
my $meta;
foreach my $init_meta(@{$spec->{INIT_META}}){
- $meta = $into->$init_meta(for_class => $into);
+ $meta = $package->$init_meta(for_class => $into);
}
if(@traits){
} @traits;
require Mouse::Util::MetaRole;
- Mouse::Util::MetaRole::apply_metaclass_roles(
- for_class => $into,
- metaclass_roles => \@traits,
+ Mouse::Util::MetaRole::apply_metaroles(
+ for => $into,
+ Mouse::Util::is_a_metarole($into->meta)
+ ? (role_metaroles => { role => \@traits })
+ : (class_metaroles => { class => \@traits }),
);
}
}
=head1 VERSION
-This document describes Mouse version 0.46
+This document describes Mouse version 0.50_02
=head1 SYNOPSIS