Make API docs look like other modules

[gitmo/Moose.git] / t / 020_attributes / 034_bad_coerce.t

diff --git a/t/020_attributes/034_bad_coerce.t b/t/020_attributes/034_bad_coerce.t
index b85c171..3d99f89 100644 (file)
--- a/t/020_attributes/034_bad_coerce.t
+++ b/t/020_attributes/034_bad_coerce.t
@@ -2,10 +2,10 @@ use strict;
 use warnings;
 
 use Test::More;
-BEGIN {
-    eval "use Test::Output;";
-    plan skip_all => "Test::Output is required for this test" if $@;
-}
+
+use Test::Requires {
+    'Test::Output' => '0.01', # skip all if not installed
+};
 
 {
     package Foo;
@@ -20,6 +20,15 @@ BEGIN {
         }
         qr/\QYou cannot coerce an attribute (foo) unless its type (Str) has a coercion/,
         'Cannot coerce unless the type has a coercion';
+
+    ::stderr_like{ has bar => (
+            is     => 'ro',
+            isa    => 'Str',
+            coerce => 1,
+        );
+        }
+        qr/\QYou cannot coerce an attribute (bar) unless its type (Str) has a coercion/,
+        'Cannot coerce unless the type has a coercion - different attribute';
 }
 
 done_testing;