* mu4e: set default width for :human-date to 12
This commit is contained in:
@ -47,7 +47,7 @@
|
|||||||
:group 'mu4e)
|
:group 'mu4e)
|
||||||
|
|
||||||
(defcustom mu4e-headers-fields
|
(defcustom mu4e-headers-fields
|
||||||
'( (:human-date . 25)
|
'( (:human-date . 12)
|
||||||
(:flags . 6)
|
(:flags . 6)
|
||||||
(:from . 22)
|
(:from . 22)
|
||||||
(:subject . nil))
|
(:subject . nil))
|
||||||
@ -332,7 +332,8 @@ otherwise ; show the from address; prefixed with the appropriate
|
|||||||
|
|
||||||
(defsubst mu4e~headers-human-date (msg)
|
(defsubst mu4e~headers-human-date (msg)
|
||||||
"Show a 'human' date -- that is, if the date is today, show the
|
"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)))
|
(let ((date (mu4e-msg-field msg :date)))
|
||||||
(if (= (nth 3 (decode-time date)) (nth 3 (decode-time (current-time))))
|
(if (= (nth 3 (decode-time date)) (nth 3 (decode-time (current-time))))
|
||||||
(format-time-string mu4e-headers-time-format date)
|
(format-time-string mu4e-headers-time-format date)
|
||||||
|
|||||||
Reference in New Issue
Block a user