X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=t%2F400-define-role.t;h=1cb7397ff30d5b17c5cf94183e6a533012fc2ded;hp=47ac4eef101efc49271ea3bcc1c981f9ce7237ca;hb=7b133c927969b2e9233a51c6be5caed54c88915e;hpb=08f7a8dbc5e48fcece4396a500d37bb2c6e45b74 diff --git a/t/400-define-role.t b/t/400-define-role.t index 47ac4ee..1cb7397 100644 --- a/t/400-define-role.t +++ b/t/400-define-role.t @@ -1,7 +1,15 @@ #!/usr/bin/env perl use strict; use warnings; -use Test::More tests => 11; +use Test::More; +BEGIN{ + if(eval{ require Class::Method::Modifiers::Fast } || eval{ require Class::Method::Modifiers }){ + plan tests => 11; + } + else{ + plan skip_all => 'This test requires Class::Method::Modifiers(::Fast)?'; + } +} use Test::Exception; lives_ok {