X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=Moose-t-failing%2F030_roles%2F024_role_composition_methods.t;fp=Moose-t-failing%2F030_roles%2F024_role_composition_methods.t;h=afc0a6c0a58752eedf9f53225b4ac73ef4d67047;hb=7c41989df01acc060a2d29a42935673265d559a6;hp=c214bae89e26402120186a8716ab923c2c0800b3;hpb=12497085db697a49a8b8794b003f5cff91c1f171;p=gitmo%2FMouse.git diff --git a/Moose-t-failing/030_roles/024_role_composition_methods.t b/Moose-t-failing/030_roles/024_role_composition_methods.t index c214bae..afc0a6c 100644 --- a/Moose-t-failing/030_roles/024_role_composition_methods.t +++ b/Moose-t-failing/030_roles/024_role_composition_methods.t @@ -7,10 +7,9 @@ use strict; use warnings; use Test::More; -$TODO = q{Mouse is not yet completed}; use Test::Exception; -use Mouse::Meta::Role::Application; +#use Mouse::Meta::Role::Application::RoleSummation; use Mouse::Meta::Role::Composite; { @@ -54,7 +53,7 @@ use Mouse::Meta::Role::Composite; is($c->name, 'Role::Foo|Role::Bar', '... got the composite role name'); lives_ok { - Mouse::Meta::Role::Application->new->apply($c); + Mouse::Meta::Role::Application::RoleSummation->new->apply($c); } '... this succeeds as expected'; is_deeply( @@ -77,7 +76,7 @@ use Mouse::Meta::Role::Composite; is($c->name, 'Role::Foo|Role::FooConflict', '... got the composite role name'); lives_ok { - Mouse::Meta::Role::Application->new->apply($c); + Mouse::Meta::Role::Application::RoleSummation->new->apply($c); } '... this succeeds as expected'; is_deeply( @@ -108,7 +107,7 @@ use Mouse::Meta::Role::Composite; is($c->name, 'Role::Foo|Role::Bar|Role::FooConflict|Role::BarConflict', '... got the composite role name'); lives_ok { - Mouse::Meta::Role::Application->new->apply($c); + Mouse::Meta::Role::Application::RoleSummation->new->apply($c); } '... this succeeds as expected'; is_deeply( @@ -137,7 +136,7 @@ use Mouse::Meta::Role::Composite; is($c->name, 'Role::Foo|Role::AnotherFooConflict', '... got the composite role name'); lives_ok { - Mouse::Meta::Role::Application->new->apply($c); + Mouse::Meta::Role::Application::RoleSummation->new->apply($c); } '... this succeeds as expected'; is_deeply(