no, actually, we do require this to work/:
Jesse Luehrs [Mon, 27 Sep 2010 07:39:03 +0000 (02:39 -0500)]
t/050_metaclasses/015_metarole.t
t/050_metaclasses/050_metarole_backcompat.t

index b961bb1..6d80c50 100644 (file)
@@ -98,10 +98,6 @@ use Moose::Util::MetaRole;
     My::Class->meta()->add_after_method_modifier( 'bar' => sub { 'bar' } );
     is( My::Class->meta()->get_method('bar')->foo(), 10,
         '... call foo() on a wrapped method metaclass object' );
-    # so that it doesn't break on reinitialization, since it's a
-    # Class::MOP::Method::Wrapped object, which isn't a Moose::Meta::Method
-    # object. Someday we'll fix this...
-    My::Class->meta()->remove_method('bar');
 }
 
 {
index bafc687..2ded6e4 100644 (file)
@@ -105,10 +105,6 @@ use Moose::Util::MetaRole;
     My::Class->meta()->add_after_method_modifier( 'bar' => sub { 'bar' } );
     is( My::Class->meta()->get_method('bar')->foo(), 10,
         '... call foo() on a wrapped method metaclass object' );
-    # so that it doesn't break on reinitialization, since it's a
-    # Class::MOP::Method::Wrapped object, which isn't a Moose::Meta::Method
-    # object. Someday we'll fix this...
-    My::Class->meta()->remove_method('bar');
 }
 
 {