Patchworkβ notmuch.el: Fix tag highlighting in search mode if some part of the line before the tags includes brackets.

login
register
about
Submitter David Edmondson
Date 2010-02-15 11:36:00
Message ID <1266233760-24897-1-git-send-email-dme@dme.org>
Download mbox | patch
Permalink /patch/366/
State New
Headers show

Comments

David Edmondson - 2010-02-15 11:36:00
---
 notmuch.el |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

Patch

diff --git a/notmuch.el b/notmuch.el
index ee0ec02..b4f8e12 100644
--- a/notmuch.el
+++ b/notmuch.el
@@ -1228,7 +1228,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