diff options
| author | Joakim Verona | 2011-06-30 01:23:11 +0200 |
|---|---|---|
| committer | Joakim Verona | 2011-06-30 01:23:11 +0200 |
| commit | 0349bc31b8abcd5c1a49c3f800e052b8581ef1d0 (patch) | |
| tree | 517e5037e0dbfa5c82dd1dd4189498759f72afa9 /lisp/eshell | |
| parent | 9333b6a4d92243ebeee9c5fc3ae3f1ec1a47abc3 (diff) | |
| parent | ada35ec18a3429c0389fe1b77d7ae82b8a5715d6 (diff) | |
| download | emacs-0349bc31b8abcd5c1a49c3f800e052b8581ef1d0.tar.gz emacs-0349bc31b8abcd5c1a49c3f800e052b8581ef1d0.zip | |
merge from upstream
Diffstat (limited to 'lisp/eshell')
| -rw-r--r-- | lisp/eshell/em-ls.el | 9 |
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'. | ||
| 62 | This is passed to `format-time-string' as a format string. | ||
| 63 | To 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'. |
| 62 | This is useful for enabling human-readable format (-h), for example." | 69 | This 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 |