X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F006-cooperative.t;h=4a5266287fc802f6c4dc675065a5ab199bc176d5;hb=f943458f1cf1fba934f789e3eebf000e67da892b;hp=7924cc3d99904a364077f88861a715cb576de2fd;hpb=8eec3c69ee4aa161601b0255c3b32cd6d9cc6998;p=gitmo%2FMooseX-Singleton.git

diff --git a/t/006-cooperative.t b/t/006-cooperative.t
index 7924cc3..4a52662 100644
--- a/t/006-cooperative.t
+++ b/t/006-cooperative.t
@@ -4,25 +4,24 @@ use warnings;
 use Test::More;
 
 BEGIN {
-    eval "require MooseX::StrictConstructor; use Test::Exception; 1;";
-    plan skip_all => 'This test requires MooseX::StrictConstructor and Test::Exception'
+    eval "require MooseX::StrictConstructor; use Test::Exception;";
+    plan skip_all =>
+        'This test requires MooseX::StrictConstructor and Test::Exception'
         if $@;
 }
 
-plan 'no_plan';
-
 {
     package MySingleton;
     use Moose;
     use MooseX::Singleton;
     use MooseX::StrictConstructor;
 
-    has 'attrib' =>
-        is      => 'rw';
+    has 'attrib' => ( is => 'rw' );
 }
 
 throws_ok {
-    MySingleton->new( bad_name => 42 )
+    MySingleton->new( bad_name => 42 );
 }
-qr/Found unknown attribute/,
-'singleton class also has a strict constructor';
+qr/Found unknown attribute/, 'singleton class also has a strict constructor';
+
+done_testing;