diff options
| author | John Wiegley <johnw@newartisans.com> | 2001-10-17 02:00:00 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2001-10-17 02:00:00 +0000 |
| commit | ef94bd99e4c9df9002133538e68667ef73edfa66 (patch) | |
| tree | 163375c38c3ea0062f367d816e28d6e75c2c2d8a /lisp/eshell/em-ls.el | |
| parent | af15ae259ace4fb06ae57e195509ba2035719277 (diff) | |
| download | emacs-ef94bd99e4c9df9002133538e68667ef73edfa66.tar.gz | |
(eshell-ls-dired-initial-args): Added an extra customization variable,
to differentiate ls-in-dired from regular uses of ls.
Diffstat (limited to 'lisp/eshell/em-ls.el')
| -rw-r--r-- | lisp/eshell/em-ls.el | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/lisp/eshell/em-ls.el b/lisp/eshell/em-ls.el index 199c176b801..00b426bac4c 100644 --- a/lisp/eshell/em-ls.el +++ b/lisp/eshell/em-ls.el @@ -63,6 +63,12 @@ This is useful for enabling human-readable format (-h), for example." :type '(repeat :tag "Arguments" string) :group 'eshell-ls) +(defcustom eshell-ls-dired-initial-args nil + "*If non-nil, args is included before any call to `ls' in dired. +This is useful for enabling human-readable format (-h), for example." + :type '(repeat :tag "Arguments" string) + :group 'eshell-ls) + (defcustom eshell-ls-use-in-dired nil "*If non-nil, use `eshell-ls' to read directories in dired." :set (lambda (symbol value) @@ -263,7 +269,7 @@ instead." (let ((insert-func 'insert) (error-func 'insert) (flush-func 'ignore) - eshell-ls-initial-args) + eshell-ls-dired-initial-args) (eshell-do-ls (append switches (list file)))))))) (defsubst eshell/ls (&rest args) |