diff options
| author | Jim Blandy <jimb@redhat.com> | 1992-10-31 05:17:46 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@redhat.com> | 1992-10-31 05:17:46 +0000 |
| commit | 2875fcc047f8dbbc341aedef182fd89523b4ff07 (patch) | |
| tree | 9359b71aa3b7c8d6c5a1e59fcaf71de622f5418c /src/dired.c | |
| parent | 09d4d36fff0ba778c64ba7495f6c9594d2041e67 (diff) | |
| download | emacs-2875fcc047f8dbbc341aedef182fd89523b4ff07.tar.gz | |
* dired.c (find_file_handler): Declare this extern.
(Ffile_attributes): Use NILP, not == Qnil.
* dired.c (Ffile_attributes): Doc fix.
Diffstat (limited to 'src/dired.c')
| -rw-r--r-- | src/dired.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/dired.c b/src/dired.c index 87ddbc19096..451907fbbe4 100644 --- a/src/dired.c +++ b/src/dired.c @@ -67,6 +67,8 @@ extern struct direct *readdir (); #define lstat stat #endif +extern Lisp_Object find_file_handler (); + Lisp_Object Vcompletion_ignored_extensions; Lisp_Object Qcompletion_ignore_case; @@ -472,7 +474,7 @@ Otherwise, list elements are:\n\ 10. inode number.\n\ 11. Device number.\n\ \n\ -If file does not exists, returns nil.") +If file does not exist, returns nil.") (filename) Lisp_Object filename; { @@ -520,7 +522,7 @@ If file does not exists, returns nil.") #endif #ifdef BSD4_2 /* file gid will be dir gid */ dirname = Ffile_name_directory (filename); - if (dirname != Qnil && stat (XSTRING (dirname)->data, &sdir) == 0) + if (! NILP (dirname) && stat (XSTRING (dirname)->data, &sdir) == 0) values[9] = (sdir.st_gid != s.st_gid) ? Qt : Qnil; else /* if we can't tell, assume worst */ values[9] = Qt; |