Use the same face for tags in `notmuch-show' mode as that used in `notmuch-search' mode. --- emacs/notmuch-show.el | 6 ++++-- 1 files changed, 4 insertions(+), 2 deletions(-) diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el index ff1a7a7..7601857 100644 --- a/emacs/notmuch-show.el +++ b/emacs/notmuch-show.el @@ -189,7 +189,8 @@ any given message." (if (re-search-forward "(\\([^()]*\\))$" (line-end-position) t) (let ((inhibit-read-only t)) (replace-match (concat "(" - (mapconcat 'identity tags " ") + (propertize (mapconcat 'identity tags " ") + 'face 'notmuch-tag-face) ")")))))) (defun notmuch-show-insert-headerline (headers date tags depth) @@ -201,7 +202,8 @@ message at DEPTH in the current thread." " (" date ") (" - (mapconcat 'identity tags " ") + (propertize (mapconcat 'identity tags " ") + 'face 'notmuch-tag-face) ")\n") (overlay-put (make-overlay start (point)) 'face 'notmuch-message-summary-face))) -- 1.7.1