diff options
Diffstat (limited to 'lisp/ls-lisp.el')
| -rw-r--r-- | lisp/ls-lisp.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/ls-lisp.el b/lisp/ls-lisp.el index 1f2c46834ec..66c56f0fcee 100644 --- a/lisp/ls-lisp.el +++ b/lisp/ls-lisp.el @@ -488,6 +488,8 @@ not contain `d', so that a full listing is expected." (defun ls-lisp--dired (orig-fun dir-or-list &optional switches) (interactive (dired-read-dir-and-switches "")) + (unless dir-or-list + (setq dir-or-list default-directory)) (if (consp dir-or-list) (funcall orig-fun dir-or-list switches) (let ((dir-wildcard (insert-directory-wildcard-in-dir-p |