Make warning for default_default include info on how to shut it up
[gitmo/Moose.git] / t / 100_bugs / 024_anon_method_metaclass.t
index f0a7494..01c5285 100644 (file)
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-use Test::More tests => 10;
+use Test::More;
 
 {
     package Ball;
@@ -39,8 +39,6 @@ for ( 1, 2 ) {
     is( Ball->meta->get_method('bounce'), $method_object,
         'original method object is preserved' );
 
-    local $TODO = "method seems to be reinitialized" if !$method_meta;
-
     is( Ball->meta->get_method('bounce')->meta . '', $original_meta,
         "method's metaclass still exists" );
     ok( Ball->meta->get_method('bounce')->meta->does_role('Arbitrary::Roll'),
@@ -48,3 +46,5 @@ for ( 1, 2 ) {
 
     undef $method_meta;
 }
+
+done_testing;