Mercurial > emacs
changeset 3017:3afba65e22fa
* fileio.c (Ffile_writable_p): Pass XSTRING (foo)->data to
ro_fsys, not XSTRING (foo).
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Mon, 24 May 1993 15:22:47 +0000 |
parents | ce9ea90b5848 |
children | f1d4c6a5976a |
files | src/fileio.c |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/fileio.c Mon May 24 15:04:07 1993 +0000 +++ b/src/fileio.c Mon May 24 15:22:47 1993 +0000 @@ -2112,7 +2112,7 @@ if (access (XSTRING (abspath)->data, 0) >= 0) return ((access (XSTRING (abspath)->data, 2) >= 0 - && ! ro_fsys (XSTRING (abspath))) + && ! ro_fsys ((char *) XSTRING (abspath)->data)) ? Qt : Qnil); dir = Ffile_name_directory (abspath); #ifdef VMS @@ -2120,7 +2120,7 @@ dir = Fdirectory_file_name (dir); #endif /* VMS */ return ((access (!NILP (dir) ? (char *) XSTRING (dir)->data : "", 2) >= 0 - && ! ro_fsys ((char *) XSTRING (dir))) + && ! ro_fsys ((char *) XSTRING (dir)->data)) ? Qt : Qnil); }