* improvements in the :mailing-list field

This commit is contained in:
djcb
2012-12-26 13:01:36 +02:00
parent e387311c72
commit 382ccc2e2e
3 changed files with 10 additions and 8 deletions

View File

@ -387,9 +387,9 @@ date. The formats used for date and time are
(defsubst mu4e~headers-mailing-list (list)
"Get some identifier for the mailing list."
(let* ((short (and list (mu4e-get-mailing-list-shortname list))))
(if short
(propertize (or short "List") 'help-echo list) "")))
(if list
(propertize (mu4e-get-mailing-list-shortname list) 'help-echo list)
""))
;; note: this function is very performance-sensitive
(defun mu4e~headers-header-handler (msg &optional point)