summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorCarl Worth <cworth@cworth.org>2010-04-26 22:49:45 -0700
committerCarl Worth <cworth@cworth.org>2010-04-26 22:49:45 -0700
commitf2ebe3ac446afda9ced6507dc391865464ccdcaa (patch)
tree70441e575cd036e1295d0635c9ed58d7a9b1cbb7
parenta4669217600e4536dc0c49f0255af5e2d9bc183f (diff)
emacs: Match entire saved-search when computing search-view buffer name
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.
-rw-r--r--emacs/notmuch.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/emacs/notmuch.el b/emacs/notmuch.el
index 9b2b592..27e3a40 100644
--- a/emacs/notmuch.el
+++ b/emacs/notmuch.el
@@ -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))