summaryrefslogtreecommitdiff
path: root/t/lib
diff options
context:
space:
mode:
authorHans Mulder <hansmu@xs4all.nl>1998-06-19 09:00:57 -0700
committerGurusamy Sarathy <gsar@cpan.org>1998-06-21 06:58:37 +0000
commitb2b3adea477dea9f31a8a3c4fccce7b061ebfe62 (patch)
tree3818c462e89dcde36bf0642032fb7f1b63f4589d /t/lib
parent429a5e67a8cd7868f6400fb40a70246ad7548973 (diff)
downloadperl-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-xt/lib/filecopy.t2
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: $!";