diff options
| author |  David Bremner <bremner@debian.org> | 2012-01-17 08:01:48 -0400 |
|---|---|---|
| committer | David Bremner <bremner@debian.org> | 2012-01-17 08:01:48 -0400 |
| commit | efa5d6cb32825f4744ddcfdcfa2fc354d9740ce1 (patch) | |
| tree | 63d5e7c9642e65484caa38096615764074dd1693 /emacs/notmuch-show.el | |
| parent | d2df1eca1e661f4354517b5030489ea162719df8 (diff) | |
Revert "emacs: Don't attempt to colour tags in `notmuch-show-mode'."
This reverts commit 4b256ff557e924fbaffca144d25a9d5f92026146.
According to id:"87aa5nlwwg.fsf@praet.org" and followup messages, the
assumptions of the patch seem not to hold in emacs 23.
Diffstat (limited to 'emacs/notmuch-show.el')
| -rw-r--r-- | emacs/notmuch-show.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el index 1a250a30..03c1f6b7 100644 --- a/emacs/notmuch-show.el +++ b/emacs/notmuch-show.el @@ -221,7 +221,10 @@ indentation." (goto-char (notmuch-show-message-top)) (if (re-search-forward "(\\([^()]*\\))$" (line-end-position) t) (let ((inhibit-read-only t)) - (replace-match (concat "(" (mapconcat 'identity tags " ") ")")))))) + (replace-match (concat "(" + (propertize (mapconcat 'identity tags " ") + 'face 'notmuch-tag-face) + ")")))))) (defun notmuch-show-clean-address (address) "Try to clean a single email ADDRESS for display. Return @@ -253,7 +256,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))) |