X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F600_todo_tests%2F003_immutable_n_around.t;h=c633bf53bce493d742f08d7db983feddfdfae9a9;hb=415572b72d8e6cc4a0fd8c05466ea60ee25a375b;hp=c7b66f95e948cc295489dd48cc4b6ad886bac411;hpb=e606ae5f848070d889472329819c95f5ba763ca3;p=gitmo%2FMoose.git

diff --git a/t/600_todo_tests/003_immutable_n_around.t b/t/600_todo_tests/003_immutable_n_around.t
index c7b66f9..c633bf5 100644
--- a/t/600_todo_tests/003_immutable_n_around.t
+++ b/t/600_todo_tests/003_immutable_n_around.t
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-use Test::More 'no_plan';
+use Test::More;
 
 # if make_immutable is removed from the following code the tests pass
 
@@ -31,7 +31,7 @@ use Test::More 'no_plan';
 
     package Zoink;
     use Moose;
-    
+
     extends qw(Gorch);
 
 }
@@ -42,13 +42,15 @@ tests: {
  TODO: {
     is( Foo->new->foo, undef, "base class (" . (Foo->meta->is_immutable ? "immutable" : "mutable") . ")" );
     is( Bar->new->foo, 42, "around new called on Bar->new (" . (Bar->meta->is_immutable ? "immutable" : "mutable") . ")"  );
-    local $TODO = 'these tests fail once Gorch is immutable' if Gorch->meta->is_immutable;
     is( Gorch->new->foo, 42, "around new called on Gorch->new (" . (Gorch->meta->is_immutable ? "immutable" : "mutable") . ")"  );
     is( Zoink->new->foo, 42, "around new called Zoink->new (" . (Zoink->meta->is_immutable ? "immutable" : "mutable") . ")"  );
     }
 
     if ( @classes ) {
+        local $SIG{__WARN__} = sub {};
         ( shift @classes )->meta->make_immutable;
         redo tests;
     }
 }
+
+done_testing;