make non-lazy builder work

[gitmo/MooseX-ClassAttribute.git] / lib / MooseX / ClassAttribute / Role / Meta / Attribute.pm

diff --git a/lib/MooseX/ClassAttribute/Role/Meta/Attribute.pm b/lib/MooseX/ClassAttribute/Role/Meta/Attribute.pm
index 1b1f1b5..66879ac 100644 (file)
--- a/lib/MooseX/ClassAttribute/Role/Meta/Attribute.pm
+++ b/lib/MooseX/ClassAttribute/Role/Meta/Attribute.pm
@@ -55,7 +55,8 @@ around 'detach_from_class' => sub
 
 sub _initialize
 {
-    my $self = shift;
+    my $self      = shift;
+    my $metaclass = shift;
 
     if ( $self->has_default() )
     {
@@ -63,7 +64,7 @@ sub _initialize
     }
     elsif ( $self->has_builder() )
     {
-        $self->set_value( undef, $self->_call_builder() );
+        $self->set_value( undef, $self->_call_builder( $metaclass->name() ) );
     }
 }