X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F20moo-param-role.t;h=1240d74350ab32e8e121558bbb10e2f876bc9c00;hb=d4e02b02b3f79c107ca96da0870c2a446216c293;hp=2b33250f384a7ec15ec1f375dcd16fd1fb9af4dc;hpb=783c658ee64d8294ad72ceb5035b618b2aaf7ff7;p=p5sagit%2FPackage-Variant.git diff --git a/t/20moo-param-role.t b/t/20moo-param-role.t index 2b33250..1240d74 100644 --- a/t/20moo-param-role.t +++ b/t/20moo-param-role.t @@ -1,5 +1,10 @@ use strictures 1; -use Test::More qw(no_plan); +use Test::More; + +BEGIN { + eval { require Moo::Role; 1 } + or plan skip_all => q{Requires Moo::Role}; +} BEGIN { package My::Role::OnOff; @@ -34,3 +39,5 @@ is($lights->lights_on, 1, 'Turn on'); is($lights->lights, 1, 'On'); is($lights->lights_off, 0, 'Turn off'); is($lights->lights, 0, 'Off'); + +done_testing;