tests and changelogging
[gitmo/Moose.git] / t / 300_immutable / 013_immutable_roundtrip.t
index a8f9b8d..a77b223 100644 (file)
@@ -5,17 +5,17 @@ use warnings;
 
 use Test::More;
 
-eval "use Test::Output";
-plan skip_all => "Test::Output is required for this test" if $@;
-
-plan tests => 1;
+use Test::Requires {
+    'Test::Output' => '0.01', # skip all if not installed
+};
 
 {
     package Foo;
     use Moose;
     __PACKAGE__->meta->make_immutable;
 }
-TODO: {
+
+{
     package Bar;
     use Moose;
 
@@ -24,9 +24,10 @@ TODO: {
     __PACKAGE__->meta->make_immutable;
     __PACKAGE__->meta->make_mutable;
 
-    use Test::More;
-    local $TODO = 'Known bug';
 
+    # This actually is testing for a bug in Class::MOP that cause
+    # Moose::Meta::Method::Constructor to spit out a warning when it
+    # shouldn't have done so. The bug was fixed in CMOP 0.75.
     ::stderr_unlike(
         sub { Bar->meta->make_immutable },
         qr/Not inlining a constructor/,
@@ -34,3 +35,4 @@ TODO: {
     );
 }
 
+done_testing;