From: John Wiegley Date: Tue, 16 Oct 2001 00:55:41 +0000 (+0000) Subject: (eshell-ls-dired-initial-args): Added an extra customization variable, X-Git-Tag: emacs-21.1~51 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dc79cfa3093e848cdee5fc18fadafda6c7ffddf3;p=emacs.git (eshell-ls-dired-initial-args): Added an extra customization variable, to differentiate ls-in-dired from regular uses of ls. --- 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)