LGTM.

Quoth David Edmondson on Dec 27 at  4:47 pm:
> The tags were coloured using text properties. Unfortunately that text
> (the header line) also has an overlay, which overrides the text
> properties. There's not point in applying text properties that will
> never be seen.
> ---
>  emacs/notmuch-show.el |    8 ++------
>  1 files changed, 2 insertions(+), 6 deletions(-)
> 
> diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el
> index 8c9d846..24f0b40 100644
> --- a/emacs/notmuch-show.el
> +++ b/emacs/notmuch-show.el
> @@ -221,10 +221,7 @@ indentation."
>      (goto-char (notmuch-show-message-top))
>      (if (re-search-forward "(\\([^()]*\\))$" (line-end-position) t)
>       (let ((inhibit-read-only t))
> -       (replace-match (concat "("
> -                              (propertize (mapconcat 'identity tags " ")
> -                                          'face 'notmuch-tag-face)
> -                              ")"))))))
> +       (replace-match (concat "(" (mapconcat 'identity tags " ") ")"))))))
>  
>  (defun notmuch-show-clean-address (address)
>    "Try to clean a single email ADDRESS for display.  Return
> @@ -278,8 +275,7 @@ message at DEPTH in the current thread."
>           " ("
>           date
>           ") ("
> -         (propertize (mapconcat 'identity tags " ")
> -                     'face 'notmuch-tag-face)
> +         (mapconcat 'identity tags " ")
>           ")\n")
>      (overlay-put (make-overlay start (point)) 'face 
> 'notmuch-message-summary-face)))
>  
_______________________________________________
notmuch mailing list
notmuch@notmuchmail.org
http://notmuchmail.org/mailman/listinfo/notmuch

Reply via email to