More code tweaking for clarity
Dave Rolsky [Mon, 14 Feb 2011 00:02:29 +0000 (18:02 -0600)]
lib/MooseX/ClassAttribute/Trait/Role/Composite.pm

index deaef10..dc4a915 100644 (file)
@@ -53,8 +53,10 @@ around apply_params => sub {
     my $orig = shift;
     my $self = shift;
 
-    my $metarole = Moose::Util::MetaRole::apply_metaroles(
-        for            => $self->$orig(@_),
+    $self->$orig(@_);
+
+    $self = Moose::Util::MetaRole::apply_metaroles(
+        for            => $self,
         role_metaroles => {
             application_to_class =>
                 ['MooseX::ClassAttribute::Trait::Application::ToClass'],
@@ -63,9 +65,9 @@ around apply_params => sub {
         },
     );
 
-    $metarole->_merge_class_attributes();
+    $self->_merge_class_attributes();
 
-    return $metarole;
+    return $self;
 };
 
 1;