make CMOP::Class->construct_instance private
[gitmo/Class-MOP.git] / t / 013_add_attribute_alternate.t
index 1bb0f03..f133d3e 100644 (file)
@@ -22,7 +22,7 @@ use Class::MOP;
 
     sub new {
         my $class = shift;
-        bless $class->meta->construct_instance(@_) => $class;
+        bless $class->meta->new_object(@_) => $class;
     }
 
     sub clear {