clean up warnings in test files due to constructors not being inlined
Jesse Luehrs [Thu, 9 Apr 2009 00:50:37 +0000 (19:50 -0500)]
t/060_compat/003_foreign_inheritence.t
t/600_todo_tests/003_immutable_n_around.t

index 1086699..f99cac9 100644 (file)
@@ -34,7 +34,7 @@ use Test::Exception;
         return $class->meta->new_object( '__INSTANCE__' => $super, @_ );
     }
 
-    __PACKAGE__->meta->make_immutable( debug => 0 );
+    __PACKAGE__->meta->make_immutable( inline_constructor => 0, debug => 0 );
 
     package Bucket;
     use metaclass 'Class::MOP::Class';
index c7b66f9..8c47b56 100644 (file)
@@ -48,6 +48,7 @@ tests: {
     }
 
     if ( @classes ) {
+        local $SIG{__WARN__} = sub {};
         ( shift @classes )->meta->make_immutable;
         redo tests;
     }