diff options
Diffstat (limited to 'lib/File')
| -rw-r--r-- | lib/File/Compare.t | 1 | ||||
| -rw-r--r-- | lib/File/Copy.t | 2 |
2 files changed, 3 insertions, 0 deletions
diff --git a/lib/File/Compare.t b/lib/File/Compare.t index 7a31af68f1..1b7d038301 100644 --- a/lib/File/Compare.t +++ b/lib/File/Compare.t @@ -112,6 +112,7 @@ if (@donetests == 3) { print "not " unless $donetests[2] == 0; print "ok 13 # "; print "TODO" if $^O eq "cygwin"; # spaces after filename silently trunc'd + print "TODO" if $^O eq "vos"; # spaces after filename silently trunc'd print " file/fileCR [$donetests[2]]\n"; } else { diff --git a/lib/File/Copy.t b/lib/File/Copy.t index 63c99d1261..ffd3d59db7 100644 --- a/lib/File/Copy.t +++ b/lib/File/Copy.t @@ -265,6 +265,8 @@ SKIP: { if $^O eq 'VMS'; skip "Copy doesn't set file permissions correctly on Win32.", $skips if $^O eq "MSWin32"; + skip "Copy maps POSIX permissions to VOS permissions.", $skips + if $^O eq "vos"; # Just a sub to get better failure messages. sub __ ($) { |