diff options
| author | Craig A. Berry <craigberry@mac.com> | 2000-08-30 10:03:14 -0500 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-08-30 20:17:11 +0000 |
| commit | 32dba258d2586abb52f8cb398035fb44e123642e (patch) | |
| tree | 8969c6e020a004ff91970b5b69c2d6dd8d7b481a /vms | |
| parent | 95678dd58021da848cf512f7ec611b96d55a8e9c (diff) | |
| download | perl-32dba258d2586abb52f8cb398035fb44e123642e.tar.gz | |
Re: not OK, 6919 on Alpha VMS V 7.1 w/ DECC 6.0-001
Message-Id: <4.3.2.7.2.20000830144622.028fe7a8@exchi01>
p4raw-id: //depot/perl@6924
Diffstat (limited to 'vms')
| -rw-r--r-- | vms/vms.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -5656,7 +5656,7 @@ cando_by_name(I32 bit, Uid_t effective, char *fname) retsts = sys$check_access(&objtyp,&namdsc,&usrdsc,armlst); if (retsts == SS$_NOPRIV || retsts == SS$_NOSUCHOBJECT || retsts == SS$_INVFILFOROP || retsts == RMS$_FNF || retsts == RMS$_SYN || - retsts == RMS$_DIR || retsts == RMS$_DEV) { + retsts == RMS$_DIR || retsts == RMS$_DEV || retsts == RMS$_DNF) { set_vaxc_errno(retsts); if (retsts == SS$_NOPRIV) set_errno(EACCES); else if (retsts == SS$_INVFILFOROP) set_errno(EINVAL); |