Mouse::Role improved
[gitmo/Mouse.git] / t / 030_roles / failing / 024_role_composition_methods.t
index 355e56b..2f60d0d 100644 (file)
@@ -12,26 +12,26 @@ use Mouse::Meta::Role::Composite;
 {
     package Role::Foo;
     use Mouse::Role;
-    
-    sub foo { 'Role::Foo::foo' }    
-    
+
+    sub foo { 'Role::Foo::foo' }
+
     package Role::Bar;
     use Mouse::Role;
 
     sub bar { 'Role::Bar::bar' }
-    
+
     package Role::FooConflict;
-    use Mouse::Role;    
-    
-    sub foo { 'Role::FooConflict::foo' }    
-    
+    use Mouse::Role;
+
+    sub foo { 'Role::FooConflict::foo' }
+
     package Role::BarConflict;
     use Mouse::Role;
-    
+
     sub bar { 'Role::BarConflict::bar' }
-    
+
     package Role::AnotherFooConflict;
-    use Mouse::Role;    
+    use Mouse::Role;
     with 'Role::FooConflict';
 
     sub baz { 'Role::AnotherFooConflict::baz' }
@@ -47,12 +47,12 @@ use Mouse::Meta::Role::Composite;
     );
     isa_ok($c, 'Mouse::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 {
         Mouse::Meta::Role::Application::RoleSummation->new->apply($c);
-    } '... this succeeds as expected';    
-    
+    } '... this succeeds as expected';
+
     is_deeply(
         [ sort $c->get_method_list ],
         [ 'bar', 'foo' ],
@@ -70,23 +70,23 @@ use Mouse::Meta::Role::Composite;
     );
     isa_ok($c, 'Mouse::Meta::Role::Composite');
 
-    is($c->name, 'Role::Foo|Role::FooConflict', '... got the composite role name');    
-    
+    is($c->name, 'Role::Foo|Role::FooConflict', '... got the composite role name');
+
     lives_ok {
         Mouse::Meta::Role::Application::RoleSummation->new->apply($c);
-    } '... this succeeds as expected';    
-    
+    } '... this succeeds as expected';
+
     is_deeply(
         [ sort $c->get_method_list ],
         [],
         '... got the right list of methods'
-    );    
-    
+    );
+
     is_deeply(
         [ sort $c->get_required_method_list ],
         [ 'foo' ],
         '... got the right list of required methods'
-    );    
+    );
 }
 
 # test complex conflict
@@ -94,14 +94,14 @@ use Mouse::Meta::Role::Composite;
     my $c = Mouse::Meta::Role::Composite->new(
         roles => [
             Role::Foo->meta,
-            Role::Bar->meta,            
+            Role::Bar->meta,
             Role::FooConflict->meta,
-            Role::BarConflict->meta,            
+            Role::BarConflict->meta,
         ]
     );
     isa_ok($c, 'Mouse::Meta::Role::Composite');
 
-    is($c->name, 'Role::Foo|Role::Bar|Role::FooConflict|Role::BarConflict', '... got the composite role name');    
+    is($c->name, 'Role::Foo|Role::Bar|Role::FooConflict|Role::BarConflict', '... got the composite role name');
 
     lives_ok {
         Mouse::Meta::Role::Application::RoleSummation->new->apply($c);
@@ -111,13 +111,13 @@ use Mouse::Meta::Role::Composite;
         [ sort $c->get_method_list ],
         [],
         '... got the right list of methods'
-    );    
-    
+    );
+
     is_deeply(
         [ sort $c->get_required_method_list ],
         [ 'bar', 'foo' ],
         '... got the right list of required methods'
-    );    
+    );
 }
 
 # test simple conflict
@@ -130,22 +130,22 @@ use Mouse::Meta::Role::Composite;
     );
     isa_ok($c, 'Mouse::Meta::Role::Composite');
 
-    is($c->name, 'Role::Foo|Role::AnotherFooConflict', '... got the composite role name');    
-    
+    is($c->name, 'Role::Foo|Role::AnotherFooConflict', '... got the composite role name');
+
     lives_ok {
         Mouse::Meta::Role::Application::RoleSummation->new->apply($c);
-    } '... this succeeds as expected';    
-    
+    } '... this succeeds as expected';
+
     is_deeply(
         [ sort $c->get_method_list ],
         [ 'baz' ],
         '... got the right list of methods'
-    );    
-    
+    );
+
     is_deeply(
         [ sort $c->get_required_method_list ],
         [ 'foo' ],
         '... got the right list of required methods'
-    );    
+    );
 }