X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F202-squirrel-role.t;h=22eb9bf09756abe2318492c928cdca0e955f0373;hb=8e64d0fa5da64639074f77d3da9b2f7aa20cce93;hp=807ccbbbcb38f2e7a83b6fa117cdc78291cb822a;hpb=7bbf018c8ddbc2f756865b01633b5a667a21d066;p=gitmo%2FMouse.git

diff --git a/t/202-squirrel-role.t b/t/202-squirrel-role.t
index 807ccbb..22eb9bf 100644
--- a/t/202-squirrel-role.t
+++ b/t/202-squirrel-role.t
@@ -6,6 +6,10 @@ use warnings;
 use Test::More;
 use Scalar::Util 'blessed';
 
+BEGIN {
+    $SIG{__WARN__} = sub { warn $_[0] if $_[0] !~ /Squirrel is deprecated/ };
+}
+
 do {
     package Foo::Role;
     use Squirrel::Role;
@@ -22,7 +26,7 @@ do {
 # affecting its definition
 
 BEGIN {
-    plan skip_all => "Moose required for this test" unless eval { require Moose::Role };
+    plan skip_all => "Moose 0.68 required for this test" unless eval { require Moose::Role && Moose::Role->VERSION('0.68') };
     plan tests => 6;
 }
 
@@ -39,7 +43,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;