This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix t/porting/customized.t --regen not to add DOS EOLs on Windows
authorSteve Hay <steve.m.hay@googlemail.com>
Tue, 6 Aug 2013 21:47:50 +0000 (22:47 +0100)
committerSteve Hay <steve.m.hay@googlemail.com>
Tue, 6 Aug 2013 21:47:50 +0000 (22:47 +0100)
t/porting/customized.t

index 331e118..a769c58 100644 (file)
@@ -71,10 +71,10 @@ EOF
 my $data_fh;
 
 if ( $regen ) {
-  open $data_fh, '>:bytes', $customised or die "Can't open $customised";
+  open $data_fh, '>:raw', $customised or die "Can't open $customised";
 }
 else {
-  open $data_fh, '<:bytes', $customised or die "Can't open $customised";
+  open $data_fh, '<:raw', $customised or die "Can't open $customised";
   while (<$data_fh>) {
     chomp;
     my ($module,$file,$sha) = split ' ';