mu4e: allow for displaying labels

Basic support for displaying labels.
This commit is contained in:
Dirk-Jan C. Binnema
2025-08-26 18:52:04 +03:00
committed by Seth Ladygo
parent 5a6ca68846
commit e6371ff705
3 changed files with 12 additions and 7 deletions

View File

@ -823,12 +823,12 @@ Note that for some messages, this can trigger high CPU load."
(':mailing-list
(let ((list (plist-get msg :list)))
(if list (mu4e-get-mailing-list-shortname list) "")))
((or ':flags ':tags)
(let ((flags (mapconcat (lambda (flag)
(if (symbolp flag)
(symbol-name flag)
flag)) fieldval ", ")))
(mu4e--view-gnus-insert-header field flags)))
((or ':flags ':labels ':tags)
(let ((items (mapconcat (lambda (item)
(if (symbolp item)
(symbol-name item)
item)) fieldval ", ")))
(mu4e--view-gnus-insert-header field items)))
(':size (mu4e--view-gnus-insert-header
field (mu4e-display-size fieldval)))
((or ':subject ':to ':from ':cc ':bcc ':from-or-to