Shut up a warning about not overwriting DESTROY
Dave Rolsky [Sun, 21 Jun 2009 16:30:58 +0000 (11:30 -0500)]
t/300_immutable/015_immutable_destroy.t

index 82a5df1..4fcb3de 100644 (file)
@@ -10,6 +10,7 @@ use Test::More tests => 1;
 
     sub DESTROY { shift->name }
 
+    local $SIG{__WARN__} = sub {};
     __PACKAGE__->meta->make_immutable;
 }