Use Moose::Meta::Class->initialize instead of Moose->init_meta in test attic/deprecate-direct-init_meta
Dave Rolsky [Tue, 30 Aug 2011 05:36:24 +0000 (00:36 -0500)]
t/metaclasses/moose_nonmoose_metatrait_init_order.t

index 8b35d87..2b68c97 100644 (file)
@@ -1,5 +1,6 @@
 use strict;
 use warnings;
+
 {
     package My::Role;
     use Moose::Role;
@@ -20,7 +21,8 @@ use warnings;
 use Test::More;
 use Moose::Util qw/find_meta does_role/;
 
-my $subsubclass_meta = Moose->init_meta( for_class => 'SubSubClassUseBase' );
+my $subsubclass_meta
+    = Moose::Meta::Class->initialize( package => 'SubSubClassUseBase' );
 ok does_role($subsubclass_meta, 'My::Role'),
     'SubSubClass metaclass does role from grandparent metaclass';
 my $subclass_meta = find_meta('SubClassUseBase');