diff options
author | Hans Mulder <hansmu@xs4all.nl> | 1998-06-19 09:00:57 -0700 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-06-21 06:58:37 +0000 |
commit | b2b3adea477dea9f31a8a3c4fccce7b061ebfe62 (patch) | |
tree | 3818c462e89dcde36bf0642032fb7f1b63f4589d /t/lib | |
parent | 429a5e67a8cd7868f6400fb40a70246ad7548973 (diff) | |
download | perl-b2b3adea477dea9f31a8a3c4fccce7b061ebfe62.tar.gz |
fixup patches for VMS
Message-Id: <3.0.5.32.19980619160057.032e7480@ous.edu>
p4raw-id: //depot/perl@1175
Diffstat (limited to 't/lib')
-rwxr-xr-x | t/lib/filecopy.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/lib/filecopy.t b/t/lib/filecopy.t index e4bde30040..329931f4b4 100755 --- a/t/lib/filecopy.t +++ b/t/lib/filecopy.t @@ -29,7 +29,7 @@ print "ok 1\n"; print "not " unless $foo eq "ok 3\n"; print "ok 2\n"; -binmode STDOUT; # Copy::copy works in binary mode +binmode STDOUT unless $^O eq 'VMS'; # Copy::copy works in binary mode copy "copy-$$", \*STDOUT; unlink "copy-$$" or die "unlink: $!"; |