Changes for 0.24
[gitmo/MooseX-Singleton.git] / t / 006-cooperative.t
index 7924cc3..4a52662 100644 (file)
@@ -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;