[perl.git] branch blead updated. v5.27.6-85-g9cfa741052

[Nicolas Rochelemagne]

In perl.git, the branch blead has been updated

<https://perl5.git.perl.org/perl.git/commitdiff/9cfa7410526b2e7b3ea7f31a338c74ab86906ac6?hp=d68aa7aafba797ba9e43bc2fbb78c694d2d6e7de>

- Log -----------------------------------------------------------------
commit 9cfa7410526b2e7b3ea7f31a338c74ab86906ac6
Author: Nicolas R <atoo...@cpan.org>
Date:   Wed Nov 29 11:05:17 2017 -0700

    IO test: adjust require for non CORE perl
    
    fix test t/io_utf8argv.t when run outside of core perl
    (noticed this on windows platform)

-----------------------------------------------------------------------

Summary of changes:
 dist/IO/t/io_utf8argv.t | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/dist/IO/t/io_utf8argv.t b/dist/IO/t/io_utf8argv.t
index d6485f45dd..2531ca6cec 100644
--- a/dist/IO/t/io_utf8argv.t
+++ b/dist/IO/t/io_utf8argv.t
@@ -5,7 +5,7 @@ BEGIN {
        print "1..0 # Skip: not perlio\n";
        exit 0;
     }
-    require($ENV{PERL_CORE} ? "../../t/test.pl" : "../t/test.pl");
+    require($ENV{PERL_CORE} ? "../../t/test.pl" : "./t/test.pl");
 }
 
 use utf8;
@@ -22,7 +22,7 @@ my $bytes =
             "\xcd\xbe\x0a";
 
 if ($::IS_EBCDIC) {
-    require($ENV{PERL_CORE} ? "../../t/charset_tools.pl" : 
"../t/charset_tools.pl");
+    require($ENV{PERL_CORE} ? "../../t/charset_tools.pl" : 
"./t/charset_tools.pl");
     $bytes = byte_utf8a_to_utf8n($bytes)
 }
 
@@ -44,4 +44,4 @@ is join('',*ARGV->getlines), "Μία πάπια, μὰ ποιὰ πάπια;
 
 END {
   1 while unlink "io_utf8argv";
-}
+}
\ No newline at end of file

-- 
Perl5 Master Repository