summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorCraig A. Berry <craigberry@mac.com>2011-09-17 07:15:15 -0500
committerCraig A. Berry <craigberry@mac.com>2011-09-17 07:15:15 -0500
commite5da71f2088e85d23f1130f062c047f05bee2c96 (patch)
treeb4092687281aecc580f2c911e25cc32532ce7c7d
parent426a09cda0fa65ac09901aeb0de4b8be77b13ee8 (diff)
downloadperl-e5da71f2088e85d23f1130f062c047f05bee2c96.tar.gz
POSIX::access() doesn't do ENOTDIR on VMS.
Even though the underlying error is RMS$_DNF. Go figure.
-rw-r--r--ext/POSIX/t/posix.t2
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/POSIX/t/posix.t b/ext/POSIX/t/posix.t
index 9bfc271b0f..a5585e0561 100644
--- a/ext/POSIX/t/posix.t
+++ b/ext/POSIX/t/posix.t
@@ -373,7 +373,7 @@ is(access('Makefile.PL/nonsense', POSIX::F_OK), undef,
'access on not-a-directory');
SKIP: {
skip("$^O is insufficiently POSIX", 1)
- if $Is_W32;
+ if $Is_W32 || $Is_VMS;
cmp_ok($!, '==', POSIX::ENOTDIR);
}