Roll back #32214 as it causes more failures than it prevents.
Craig A. Berry [Sun, 4 Nov 2007 16:41:28 +0000 (16:41 +0000)]
p4raw-id: //depot/perl@32219

t/TestInit.pm

index 058ad29..aa76fe1 100644 (file)
@@ -18,13 +18,7 @@ package TestInit;
 $VERSION = 1.01;
 
 chdir 't' if -d 't';
-if ($^O eq 'VMS') {
-    require File::Spec;
-    @INC = File::Spec->rel2abs('[-.lib]');
-}
-else {
-    @INC = '../lib';
-}
+@INC = '../lib';
 
 # Don't interfere with the taintedness of %ENV, this could perturbate tests
 $ENV{PERL_CORE} = 1 unless ${^TAINT};