X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F030_roles%2F016_runtime_roles_and_nonmoose.t;h=3f1f49f7c2732f1291b8de17ecc98cdc0f799d68;hb=refs%2Fheads%2Fabandoned%2Fdeath_to_all_ellipses;hp=be31150fe51d04a6db6aef28b547e92fe9fbd4cd;hpb=d03bd989b97597428b460d7f9a021e2931893fa0;p=gitmo%2FMoose.git diff --git a/t/030_roles/016_runtime_roles_and_nonmoose.t b/t/030_roles/016_runtime_roles_and_nonmoose.t index be31150..3f1f49f 100644 --- a/t/030_roles/016_runtime_roles_and_nonmoose.t +++ b/t/030_roles/016_runtime_roles_and_nonmoose.t @@ -43,15 +43,15 @@ ok(!$bar->can( 'talk' ), "... the role is not composed yet"); dies_ok { $foo->dog($bar) -} '... and setting the accessor fails (not a Dog yet)'; +} 'and setting the accessor fails (not a Dog yet)'; Dog->meta->apply($bar); ok($bar->can('talk'), "... the role is now composed at the object level"); -is($bar->talk, 'woof', '... got the right return value for the newly composed method'); +is($bar->talk, 'woof', 'got the right return value for the newly composed method'); lives_ok { $foo->dog($bar) -} '... and setting the accessor is okay'; +} 'and setting the accessor is okay';