really fix MetaRole API use
Dave Rolsky [Thu, 15 Jul 2010 15:39:05 +0000 (10:39 -0500)]
lib/MooseX/ClassAttribute/Trait/Application/ToClass.pm
lib/MooseX/ClassAttribute/Trait/Application/ToRole.pm

index 9026aed..423de0f 100644 (file)
@@ -13,7 +13,7 @@ sub _apply_class_attributes {
     my $role  = shift;
     my $class = shift;
 
-    $class = Moose::Util::MetaRole::apply_metaclass_roles(
+    $class = Moose::Util::MetaRole::apply_metaroles(
         for             => $class,
         class_metaroles => {
             class => ['MooseX::ClassAttribute::Trait::Class'],
index e20dcdf..52a6047 100644 (file)
@@ -16,7 +16,7 @@ sub _apply_class_attributes {
     my $role1 = shift;
     my $role2 = shift;
 
-    $role2 = Moose::Util::MetaRole::apply_metaclass_roles(
+    $role2 = Moose::Util::MetaRole::apply_metaroles(
         for            => $role2,
         role_metaroles => {
             role => ['MooseX::ClassAttribute::Trait::Role'],