blob: e0ef990f9976439dcd0d404f66842633384875f0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
#!./perl
BEGIN {
chdir 't' if -d 't';
@INC = '../lib';
}
use Test::More tests => 3;
my @blib_paths = grep { /blib/ } @INC;
is( @blib_paths, 0, 'No blib dirs yet in @INC' );
use_ok( 'ExtUtils::testlib' );
@blib_paths = grep { /blib/ } @INC;
is( @blib_paths, 2, 'ExtUtils::testlib added two @INC dirs!' );
|