emacs: Match entire saved-search when computing search-view buffer name

[notmuch] / emacs / notmuch.el

diff --git a/emacs/notmuch.el b/emacs/notmuch.el
index 9b2b5924e856bfc973564c531f9310d9a3516e32..27e3a4094c398f9b7393ae19565ba611a1bab21b 100644 (file)
--- 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))