This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Use minimal @INC in tests, most of the time just '../lib',
[perl5.git] / t / op / bless.t
index 46bf6c3..3aaceb8 100644 (file)
@@ -4,7 +4,7 @@ print "1..31\n";
 
 BEGIN {
     chdir 't' if -d 't';
-    unshift @INC, '../lib' if -d '../lib';
+    @INC = '../lib';
 }
 
 sub expected {