This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove some commented-out lines from win32/config_h.PL
authorSteve Hay <steve.m.hay@googlemail.com>
Thu, 7 Jun 2012 13:24:42 +0000 (14:24 +0100)
committerSteve Hay <steve.m.hay@googlemail.com>
Thu, 7 Jun 2012 13:24:42 +0000 (14:24 +0100)
win32/config_h.PL

index 3905e33..7ce39d5 100644 (file)
@@ -51,7 +51,6 @@ eval $str;
 die "$str:$@" if $@;
 
 open(H,">$file.new") || die "Cannot open $file.new:$!";
-#binmode H;            # no CRs (which cause a spurious rebuild)
 while (<SH>)
  {
   last if /^$term$/o;
@@ -86,7 +85,6 @@ if (compare("$file.new",$file))
   chmod(0666,$file);
   unlink($file);
   rename("$file.new",$file);
-  #chmod(0444,$file);
   exit(1);
  }
 else