This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Get lc.t working under minitest
[perl5.git] / t / op / lc.t
index bb5d4c1..542ba3d 100644 (file)
--- a/t/op/lc.t
+++ b/t/op/lc.t
@@ -4,9 +4,11 @@
 
 BEGIN {
     chdir 't';
-    @INC = '../lib';
+    require './test.pl';
+    @INC = () unless is_miniperl();
+    unshift @INC, '../lib';
     require Config; import Config;
-    require './test.pl'; require './charset_tools.pl';
+    require './charset_tools.pl';
     require './loc_tools.pl';   # Contains find_utf8_ctype_locale()
 }