X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F106_LazyClass_test.t;h=94c50fb5a93eafb805515b86d57eb5128d5ee85c;hb=d69fb6b34cf37d63bbed4d941ad809539299e218;hp=5d6d1bf4514c0862c4a6e13b7da577dd43cdd1fc;hpb=efd3d14c1cf03120dfd1ed7787f8050e55bb8319;p=gitmo%2FClass-MOP.git diff --git a/t/106_LazyClass_test.t b/t/106_LazyClass_test.t index 5d6d1bf..94c50fb 100644 --- a/t/106_LazyClass_test.t +++ b/t/106_LazyClass_test.t @@ -1,5 +1,3 @@ -#!/usr/bin/perl - use strict; use warnings; @@ -35,7 +33,7 @@ BEGIN {use Class::MOP; sub new { my $class = shift; - bless $class->meta->construct_instance(@_) => $class; + bless $class->meta->new_object(@_) => $class; } }