From: David Edmondson <dme@dme.org>
Date: Tue, 23 Mar 2010 07:04:34 +0000 (+0000)
Subject: emacs/notmuch.el: Improve tag highlighting in search mode
X-Git-Tag: 0.1~12
X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=commitdiff_plain;h=e33b73819a8a1005583cb3de69759172aacf98ba

emacs/notmuch.el: Improve tag highlighting in search mode

Assume that tags never include an opening bracket, and hence improve
the regular expression used to highlight them. This avoids false
matches where the 'from' address of a thread participant includes an
opening bracket.
---

diff --git a/emacs/notmuch.el b/emacs/notmuch.el
index 439303a7..050aacb9 100644
--- a/emacs/notmuch.el
+++ b/emacs/notmuch.el
@@ -1359,7 +1359,7 @@ Complete list of currently available key bindings:
   (setq buffer-read-only t)
   (if (not notmuch-tag-face-alist)
       (add-to-list 'notmuch-search-font-lock-keywords (list
-		"(\\([^)]*\\))$" '(1  'notmuch-tag-face)))
+		"(\\([^()]*\\))$" '(1  'notmuch-tag-face)))
     (let ((notmuch-search-tags (mapcar 'car notmuch-tag-face-alist)))
       (loop for notmuch-search-tag  in notmuch-search-tags
 	    do (add-to-list 'notmuch-search-font-lock-keywords (list