use strict;
use warnings;
use Test::More;
-BEGIN {
- eval "use Test::Output;";
- plan skip_all => "Test::Output is required for this test" if $@;
- plan tests => 8;
-}
+
+use Test::Requires {
+ 'Test::Output' => '0.01', # skip all if not installed
+};
# this test script ensures that my idiom of:
# role: sub BUILD, after BUILD
use Moose;
::stderr_is {
- with 'TestRole' => { excludes => 'BUILD' };
+ with 'TestRole' => { -excludes => 'BUILD' };
} '';
sub BUILD { push @CALLS, 'ExplicitClassWithBUILD::BUILD' }
}
}
+done_testing;