diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-04-05 13:34:11 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-04-05 13:34:11 +0000 |
commit | 776b00a7bc9dd00537866358a47be2e07a70a235 (patch) | |
tree | 8c44318ac6ffc19884151d6566031ad91bfb7344 /lib/Tie | |
parent | 7a9e22343ee2c409475baf99c2f838dc7fc1f7b8 (diff) | |
download | perl-776b00a7bc9dd00537866358a47be2e07a70a235.tar.gz |
Win32 pacifying from mjd.
p4raw-id: //depot/perl@15746
Diffstat (limited to 'lib/Tie')
-rw-r--r-- | lib/Tie/File/t/26_twrite.t | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/Tie/File/t/26_twrite.t b/lib/Tie/File/t/26_twrite.t index e3d03a002c..1d9073c073 100644 --- a/lib/Tie/File/t/26_twrite.t +++ b/lib/Tie/File/t/26_twrite.t @@ -290,6 +290,7 @@ sub try { undef $o; untie @lines; open F, "< $file" or die "Couldn't open file $file: $!"; + binmode F; my $actual; { local $/; $actual = <F>; |