diff options
Diffstat (limited to 'lisp/find-lisp.el')
| -rw-r--r-- | lisp/find-lisp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/find-lisp.el b/lisp/find-lisp.el index 18e30ef37eb..0dd35f23514 100644 --- a/lisp/find-lisp.el +++ b/lisp/find-lisp.el @@ -95,7 +95,7 @@ PARENT is the parent directory of DIR." (string= dir "..") ;; Skip directories which are symlinks ;; Easy way to circumvent recursive loops - (file-symlink-p dir)))) + (file-symlink-p (expand-file-name dir parent))))) (defun find-lisp-default-file-predicate (file dir) "True if FILE matches `find-lisp-regexp'. |