aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/eshell
diff options
context:
space:
mode:
authorJoakim Verona2011-06-30 01:23:11 +0200
committerJoakim Verona2011-06-30 01:23:11 +0200
commit0349bc31b8abcd5c1a49c3f800e052b8581ef1d0 (patch)
tree517e5037e0dbfa5c82dd1dd4189498759f72afa9 /lisp/eshell
parent9333b6a4d92243ebeee9c5fc3ae3f1ec1a47abc3 (diff)
parentada35ec18a3429c0389fe1b77d7ae82b8a5715d6 (diff)
downloademacs-0349bc31b8abcd5c1a49c3f800e052b8581ef1d0.tar.gz
emacs-0349bc31b8abcd5c1a49c3f800e052b8581ef1d0.zip
merge from upstream
Diffstat (limited to 'lisp/eshell')
-rw-r--r--lisp/eshell/em-ls.el9
1 files changed, 8 insertions, 1 deletions
diff --git a/lisp/eshell/em-ls.el b/lisp/eshell/em-ls.el
index 4ef259dee4b..17dbe3fbaf2 100644
--- a/lisp/eshell/em-ls.el
+++ b/lisp/eshell/em-ls.el
@@ -57,6 +57,13 @@ properties to colorize its output based on the setting of
57 :type 'hook 57 :type 'hook
58 :group 'eshell-ls) 58 :group 'eshell-ls)
59 59
60(defcustom eshell-ls-date-format "%Y-%m-%d"
61 "How to display time information in `eshell-ls-file'.
62This is passed to `format-time-string' as a format string.
63To display the date using the current locale, use \"%b \%e\"."
64 :type 'string
65 :group 'eshell-ls)
66
60(defcustom eshell-ls-initial-args nil 67(defcustom eshell-ls-initial-args nil
61 "If non-nil, this list of args is included before any call to `ls'. 68 "If non-nil, this list of args is included before any call to `ls'.
62This is useful for enabling human-readable format (-h), for example." 69This is useful for enabling human-readable format (-h), for example."
@@ -508,7 +515,7 @@ whose cdr is the list of file attributes."
508 str)) 515 str))
509 " " (format-time-string 516 " " (format-time-string
510 (concat 517 (concat
511 "%b %e " 518 eshell-ls-date-format " "
512 (if (= (nth 5 (decode-time (current-time))) 519 (if (= (nth 5 (decode-time (current-time)))
513 (nth 5 (decode-time 520 (nth 5 (decode-time
514 (nth (cond 521 (nth (cond