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