* mu4e: set default width for :human-date to 12

This commit is contained in:
djcb 2012-10-22 20:27:14 +03:00
parent b16a42a48c
commit 0276ea0408
1 changed files with 13 additions and 12 deletions

View File

@ -47,7 +47,7 @@
:group 'mu4e)
(defcustom mu4e-headers-fields
'( (:human-date . 25)
'( (:human-date . 12)
(:flags . 6)
(:from . 22)
(:subject . nil))
@ -332,7 +332,8 @@ otherwise ; show the from address; prefixed with the appropriate
(defsubst mu4e~headers-human-date (msg)
"Show a 'human' date -- that is, if the date is today, show the
date, otherwise, show the time."
date, otherwise, show the time. The formats used for date and time
are `mu4e-headers-date-format' and `mu4e-headers-time-format'."
(let ((date (mu4e-msg-field msg :date)))
(if (= (nth 3 (decode-time date)) (nth 3 (decode-time (current-time))))
(format-time-string mu4e-headers-time-format date)