Skip a test requiring method modifiers
gfx [Thu, 24 Sep 2009 07:18:51 +0000 (16:18 +0900)]
t/020_attributes/015_attribute_traits.t

index 4197708..2c557ca 100644 (file)
@@ -4,7 +4,15 @@ use lib 't/lib';
 use strict;
 use warnings;
 
-use Test::More tests => 12;
+use Test::More;
+BEGIN{
+    if(eval{ require Class::Method::Modifiers::Fast } || eval{ require Class::Method::Modifiers }){
+        plan tests => 12;
+    }
+    else{
+        plan skip_all => 'This test requires Class::Method::Modifiers(::Fast)?';
+    }
+}
 use Test::Exception;
 use Test::Mouse;