This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Get t/uni/cache.t working under minitest
authorFather Chrysostomos <sprout@cpan.org>
Mon, 1 Sep 2014 05:38:26 +0000 (22:38 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Wed, 3 Sep 2014 03:11:15 +0000 (20:11 -0700)
minitest can run before everything is built.  Hence, we need to make sure
the directories that buildcustomize.pl puts in @INC are not clobbered by
the test script.

t/uni/cache.t

index 7b6e31e..87953f3 100644 (file)
@@ -1,7 +1,8 @@
 BEGIN {
     chdir 't' if -d 't';
 BEGIN {
     chdir 't' if -d 't';
-    @INC = qw(../lib .);
-    require "test.pl";
+    require './test.pl';
+    @INC = () unless is_miniperl();
+    unshift @INC, '../lib';
 }
 
 plan tests => 1;
 }
 
 plan tests => 1;