diff options
Diffstat (limited to 'lisp/eshell')
| -rw-r--r-- | lisp/eshell/em-ls.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/eshell/em-ls.el b/lisp/eshell/em-ls.el index 4a5adc48f2b..39f03ffb79e 100644 --- a/lisp/eshell/em-ls.el +++ b/lisp/eshell/em-ls.el | |||
| @@ -278,8 +278,12 @@ instead." | |||
| 278 | (let ((insert-func 'insert) | 278 | (let ((insert-func 'insert) |
| 279 | (error-func 'insert) | 279 | (error-func 'insert) |
| 280 | (flush-func 'ignore) | 280 | (flush-func 'ignore) |
| 281 | eshell-ls-dired-initial-args) | 281 | (switches |
| 282 | (eshell-do-ls (append switches (list file))))))))) | 282 | (append eshell-ls-dired-initial-args |
| 283 | (and (or (consp dired-directory) wildcard) (list "-d")) | ||
| 284 | switches))) | ||
| 285 | (eshell-do-ls (nconc switches (list file))))))))) | ||
| 286 | |||
| 283 | 287 | ||
| 284 | (declare-function eshell-extended-glob "em-glob" (glob)) | 288 | (declare-function eshell-extended-glob "em-glob" (glob)) |
| 285 | (declare-function dired-read-dir-and-switches "dired" (str)) | 289 | (declare-function dired-read-dir-and-switches "dired" (str)) |