diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/ExtUtils/Command.pm')
-rw-r--r-- | Master/tlpkg/tlperl/lib/ExtUtils/Command.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Master/tlpkg/tlperl/lib/ExtUtils/Command.pm b/Master/tlpkg/tlperl/lib/ExtUtils/Command.pm index 34e85decfbe..c9ff022f033 100644 --- a/Master/tlpkg/tlperl/lib/ExtUtils/Command.pm +++ b/Master/tlpkg/tlperl/lib/ExtUtils/Command.pm @@ -7,7 +7,7 @@ use vars qw(@ISA @EXPORT @EXPORT_OK $VERSION); @ISA = qw(Exporter); @EXPORT = qw(cp rm_f rm_rf mv cat eqtime mkpath touch test_f test_d chmod dos2unix); -$VERSION = '7.10_02'; +$VERSION = '7.24'; $VERSION = eval $VERSION; my $Is_VMS = $^O eq 'VMS'; @@ -350,6 +350,7 @@ sub dos2unix { open ORIG, $_ or do { warn "dos2unix can't open $_: $!"; return }; open TEMP, ">$temp" or do { warn "dos2unix can't create .dos2unix_tmp: $!"; return }; + binmode ORIG; binmode TEMP; while (my $line = <ORIG>) { $line =~ s/\015\012/\012/g; print TEMP $line; |