X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F030_roles%2F026_role_composition_method_mods.t;h=5df652379d8d6f8a6bccaca7a46caaa93381e800;hb=06d16be025b59d5bb71c237c6ab27c6053c2b615;hp=d83ee4e5997b5e9e84ed8b5f8e8d9e7f31204b7f;hpb=7ff5653479c2bfc0794635f7fbade9bfe7bb2381;p=gitmo%2FMoose.git

diff --git a/t/030_roles/026_role_composition_method_mods.t b/t/030_roles/026_role_composition_method_mods.t
index d83ee4e..5df6523 100644
--- a/t/030_roles/026_role_composition_method_mods.t
+++ b/t/030_roles/026_role_composition_method_mods.t
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-use Test::More tests => 7;
+use Test::More;
 use Test::Exception;
 
 use Moose::Meta::Role::Application::RoleSummation;
@@ -14,16 +14,16 @@ use Moose::Meta::Role::Composite;
     use Moose::Role;
 
     before foo => sub { 'Role::Foo::foo' };
-    around foo => sub { 'Role::Foo::foo' };    
-    after  foo => sub { 'Role::Foo::foo' };        
+    around foo => sub { 'Role::Foo::foo' };
+    after  foo => sub { 'Role::Foo::foo' };
     around baz => sub { [ 'Role::Foo', @{shift->(@_)} ] };
 
     package Role::Bar;
     use Moose::Role;
 
     before bar => sub { 'Role::Bar::bar' };
-    around bar => sub { 'Role::Bar::bar' };    
-    after  bar => sub { 'Role::Bar::bar' };    
+    around bar => sub { 'Role::Bar::bar' };
+    after  bar => sub { 'Role::Bar::bar' };
 
     package Role::Baz;
     use Moose::Role;
@@ -60,11 +60,11 @@ use Moose::Meta::Role::Composite;
     );
     isa_ok($c, 'Moose::Meta::Role::Composite');
 
-    is($c->name, 'Role::Foo|Role::Bar', '... got the composite role name');    
+    is($c->name, 'Role::Foo|Role::Bar', '... got the composite role name');
 
     lives_ok {
         Moose::Meta::Role::Application::RoleSummation->new->apply($c);
-    } '... this succeeds as expected';    
+    } '... this succeeds as expected';
 
     is_deeply(
         [ sort $c->get_method_modifier_list('before') ],
@@ -76,11 +76,13 @@ use Moose::Meta::Role::Composite;
         [ sort $c->get_method_modifier_list('after') ],
         [ 'bar', 'foo' ],
         '... got the right list of methods'
-    );    
+    );
 
     is_deeply(
         [ sort $c->get_method_modifier_list('around') ],
         [ 'bar', 'baz', 'foo' ],
         '... got the right list of methods'
-    );    
+    );
 }
+
+done_testing;