X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=t%2F030_roles%2F019_build.t;h=8d3a4a4bd3b57b401e62d89d5b84a9a166c7eccf;hp=f76ea5a32d03af5ca432a32b0b3f27b864c36594;hb=49a56bbafc81e4d50e4a95a65f987a448dfe5ecc;hpb=0eaf53c27a3ef11c0a515a91df229d10bf29b58d diff --git a/t/030_roles/019_build.t b/t/030_roles/019_build.t index f76ea5a..8d3a4a4 100644 --- a/t/030_roles/019_build.t +++ b/t/030_roles/019_build.t @@ -1,7 +1,19 @@ #!/usr/bin/env perl use strict; use warnings; -use Test::More tests => 6; +use Test::More; +BEGIN { + plan skip_all => + "This test requires Class::Method::Modifiers or Class::Method::Modifiers::Fast" + unless eval { + require Class::Method::Modifiers::Fast; + } or eval { + require Class::Method::Modifiers; + }; +} + +plan tests => 6; + # this test script ensures that my idiom of: # role: sub BUILD, after BUILD