]> git.notmuchmail.org Git - notmuch/commitdiff
emacs: Match entire saved-search when computing search-view buffer name
authorCarl Worth <cworth@cworth.org>
Tue, 27 Apr 2010 05:49:45 +0000 (22:49 -0700)
committerCarl Worth <cworth@cworth.org>
Tue, 27 Apr 2010 05:49:45 +0000 (22:49 -0700)
I happen to have a lot of saved searches that are variants of the
tag:inbox search, (such as "tag:inbox and tag:notmuch"). The logic for
these was always matching inbox first, resulting in "[ inbox ] and
tag:notmuch" rather than "notmuch" as desired.

Anchor the regular expression on both ends to make it look harder for
the better match.

emacs/notmuch.el

index 9b2b5924e856bfc973564c531f9310d9a3516e32..27e3a4094c398f9b7393ae19565ba611a1bab21b 100644 (file)
@@ -663,7 +663,7 @@ characters as well as `_.+-'.
 (defun notmuch-search-buffer-title (query)
   "Returns the title for a buffer with notmuch search results."
   (let* ((folder (rassoc-if (lambda (key)
-                             (string-match (concat "^" (regexp-quote key))
+                             (string-match (concat "^" (regexp-quote key) "$")
                                            query))
                            (notmuch-saved-searches)))
         (folder-name (car folder))