Commit | Line | Data |
60ffb308 |
1 | #!/usr/bin/perl -w |
2 | |
3 | BEGIN { |
4 | if( $ENV{PERL_CORE} ) { |
5 | chdir 't'; |
6 | @INC = '../lib'; |
7 | } |
8 | } |
9 | |
10 | use Test::More; |
11 | |
12 | BEGIN { |
13 | if( !$ENV{HARNESS_ACTIVE} && $ENV{PERL_CORE} ) { |
14 | plan skip_all => "Won't work with t/TEST"; |
15 | } |
16 | } |
17 | |
18 | BEGIN { |
19 | require Test::Harness; |
20 | } |
21 | |
22 | if( $Test::Harness::VERSION < 1.20 ) { |
23 | plan skip_all => 'Need Test::Harness 1.20 or up'; |
24 | } |
25 | |
26 | use strict; |
27 | use Test::Builder; |
28 | |
29 | plan 'no_plan'; |
30 | is(Test::Builder->has_plan, 'no_plan', 'has no_plan'); |