From: Graham Knop Date: Thu, 31 Oct 2013 21:38:56 +0000 (-0400) Subject: make stackable test immune to external local libs X-Git-Tag: 1.008025~1 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=974b12252f63b448eb0435c50169d9f76d688de5;p=p5sagit%2Flocal-lib.git make stackable test immune to external local libs --- diff --git a/t/stackable.t b/t/stackable.t index e57d9ce..1922245 100644 --- a/t/stackable.t +++ b/t/stackable.t @@ -10,6 +10,8 @@ use local::lib (); use lib 't/lib'; use TempDir; +delete $ENV{PERL_LOCAL_LIB_ROOT}; + my $dir1 = mk_temp_dir('test_local_lib-XXXXX'); my $dir2 = mk_temp_dir('test_local_lib-XXXXX'); @@ -17,7 +19,6 @@ my ($dir1_arch, $dir2_arch) = map { File::Spec->catfile($_, qw'lib perl5', $Conf note $dir1_arch; note $dir2_arch; - my $prev_active = () = local::lib->active_paths; local::lib->import($dir1);