Mercurial > emacs
changeset 39984:5e4848f89017
(eshell-ls-dired-initial-args): Added an extra customization variable,
to differentiate ls-in-dired from regular uses of ls.
| author | John Wiegley <johnw@newartisans.com> |
|---|---|
| date | Wed, 17 Oct 2001 02:00:00 +0000 |
| parents | baefc4f3c437 |
| children | 3a906538d254 |
| files | lisp/eshell/em-ls.el |
| diffstat | 1 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/eshell/em-ls.el Wed Oct 17 01:58:38 2001 +0000 +++ b/lisp/eshell/em-ls.el Wed Oct 17 02:00:00 2001 +0000 @@ -63,6 +63,12 @@ :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 @@ (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)