the test still passes when occurences of "use utf8" are removed

Perl-Toolchain-Gang · Dec 6, 2011 · 5cfe22f · 5cfe22f
1 parent f6aab39
commit 5cfe22f
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 4 deletions.
diff --git a/lib/ExtUtils/MakeMaker.pm b/lib/ExtUtils/MakeMaker.pm
@@ -1021,7 +1021,7 @@ sub flush {
     print STDOUT "Writing $finalname for $self->{NAME}\n";
 
     unlink($finalname, "MakeMaker.tmp", $Is_VMS ? 'Descrip.MMS' : ());
-    open(my $fh,">:utf8", "MakeMaker.tmp")
+    open(my $fh,">", "MakeMaker.tmp")
         or die "Unable to open MakeMaker.tmp: $!";
 
     for my $chunk (@{$self->{RESULT}}) {

diff --git a/t/lib/MakeMaker/Test/Setup/Unicode.pm b/t/lib/MakeMaker/Test/Setup/Unicode.pm
@@ -8,12 +8,10 @@ use strict;
 use File::Path;
 use File::Basename;
 use MakeMaker::Test::Utils;
-use utf8;
 
 my %Files = (
              'Problem-Module/Makefile.PL'   => <<'END',
 use ExtUtils::MakeMaker;
-use utf8;
 
 WriteMakefile(
     NAME    => 'Problem::Module',
@@ -31,7 +29,7 @@ sub setup_recurs {
 
         my $dir = dirname($file);
         mkpath $dir;
-        open(FILE, ">:utf8", $file) || die "Can't create $file: $!";
+        open(FILE, ">", $file) || die "Can't create $file: $!";
         print FILE $text;
         close FILE;