diff options
author | Craig A. Berry <craigberry@mac.com> | 2011-09-17 07:15:15 -0500 |
---|---|---|
committer | Craig A. Berry <craigberry@mac.com> | 2011-09-17 07:15:15 -0500 |
commit | e5da71f2088e85d23f1130f062c047f05bee2c96 (patch) | |
tree | b4092687281aecc580f2c911e25cc32532ce7c7d | |
parent | 426a09cda0fa65ac09901aeb0de4b8be77b13ee8 (diff) | |
download | perl-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.t | 2 |
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); } |