X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F202-squirrel-role.t;h=dd6f7d925f7d936dbb0a1cd685685c94af448be1;hb=ab1a1cce52104e19f86fec43e8ffa9f008041ee5;hp=618b9504717502f9ea10cbb746f99f50a1f42137;hpb=9fc566e38c5a8786a58aace9ee7304339234ea4b;p=gitmo%2FMouse.git diff --git a/t/202-squirrel-role.t b/t/202-squirrel-role.t index 618b950..dd6f7d9 100644 --- a/t/202-squirrel-role.t +++ b/t/202-squirrel-role.t @@ -22,8 +22,8 @@ do { # affecting its definition BEGIN { - plan skip_all => "Moose required for this test" unless eval { require Moose }; - plan tests => 12; + plan skip_all => "Moose 0.68 required for this test" unless eval { require Moose::Role && Moose::Role->VERSION('0.68') }; + plan tests => 6; } do { @@ -39,7 +39,10 @@ do { }; ok(!Foo::Role->can('has'), "Mouse::Role::has was unimported"); -ok(!Bar::Role->can('has'), "Moose::Role::has was unimported"); +SKIP: { + skip "ancient moose", 1 if $Moose::VERSION <= 0.50; + ok(!Bar::Role->can('has'), "Moose::Role::has was unimported"); +} eval " package Foo::Role; @@ -53,9 +56,9 @@ eval " has bar => (is => 'rw'); "; -isa_ok(blessed(Foo::Role->meta), 'Mouse::Meta::Role'); -isa_ok(blessed(Foo::Role->meta), 'Mouse::Meta::Role', 'Squirrel::Role is consistent if Moose was loaded between imports'); +isa_ok(Foo::Role->meta, 'Mouse::Meta::Role'); +isa_ok(Foo::Role->meta, 'Mouse::Meta::Role'); -isa_ok(blessed(Bar::Role->meta), 'Moose::Meta::Role'); -isa_ok(blessed(Bar::Role->meta), 'Moose::Meta::Role'); +isa_ok(Bar::Role->meta, 'Moose::Meta::Role'); +isa_ok(Bar::Role->meta, 'Moose::Meta::Role');