[p5sagit/local-lib.git] / t / lib-core-only.t

use strict;
use warnings FATAL => 'all';
use Test::More tests => 1;
use lib::core::only ();
use Config;

is_deeply(
  [ do { local @INC = @INC; lib::core::only->import; @INC } ],
  [ $Config{privlibexp}, $Config{archlibexp} ],
  'lib::core::only mangles @INC correctly'
);
Commit	Line	Data
57ddfe24	1	use strict;
	2	use warnings FATAL => 'all';
	3	use Test::More tests => 1;
	4	use lib::core::only ();
	5	use Config;
	6
	7	is_deeply(
	8	[ do { local @INC = @INC; lib::core::only->import; @INC } ],
	9	[ $Config{privlibexp}, $Config{archlibexp} ],
	10	'lib::core::only mangles @INC correctly'
	11	);