X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=blobdiff_plain;f=emacs%2Fnotmuch.el;h=d09252828f6b063300308adef096ff674a716e00;hp=7180b9d94a74038f9e82b053ada71aa9390849c6;hb=90e741ef81668d9b7db62b57e9a0c88877e2631e;hpb=e94b45112ec7262224fdaae03bae75eb47cdece0 diff --git a/emacs/notmuch.el b/emacs/notmuch.el index 7180b9d9..d0925282 100644 --- a/emacs/notmuch.el +++ b/emacs/notmuch.el @@ -775,11 +775,9 @@ non-authors is found, assume that all of the authors match." (notmuch-search-insert-authors format-string (plist-get result :authors))) ((string-equal field "tags") - ;; Ignore format-string here because notmuch-search-set-tags - ;; depends on the format of this - (insert (concat "(" (propertize - (mapconcat 'identity (plist-get result :tags) " ") - 'font-lock-face 'notmuch-tag-face) ")"))))) + (let ((tags-str (mapconcat 'identity (plist-get result :tags) " "))) + (insert (propertize (format format-string tags-str) + 'face 'notmuch-tag-face)))))) (defun notmuch-search-show-result (result &optional pos) "Insert RESULT at POS or the end of the buffer if POS is null."