X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;f=emacs%2Fnotmuch.el;h=804e78ab8c53cf855cd9a5ea3713f19b40da4886;hb=c09aad479464965f5296438eeb3afba0ec64d13b;hp=44402f8aa8256b55816b9a256b6b7f7468e54e9d;hpb=84ae74aada7d4a4574c09a81c9bddcc947d834b1;p=notmuch

diff --git a/emacs/notmuch.el b/emacs/notmuch.el
index 44402f8a..804e78ab 100644
--- a/emacs/notmuch.el
+++ b/emacs/notmuch.el
@@ -711,7 +711,7 @@ A thread with TAG will have FACE applied.
 Here is an example of how to color search results based on tags.
  (the following text would be placed in your ~/.emacs file):
 
- (setq notmuch-search-line-faces '((\"unread\" . (:foreground \"green\"))
+ (setq notmuch-search-line-faces \\='((\"unread\" . (:foreground \"green\"))
                                    (\"deleted\" . (:foreground \"red\"
 						  :background \"blue\"))))
 
@@ -1076,7 +1076,7 @@ current search results AND the additional query string provided."
 Runs a new search matching only messages that match both the
 current search results AND that are tagged with the given tag."
   (interactive
-   (list (notmuch-select-tag-with-completion "Filter by tag: ")))
+   (list (notmuch-select-tag-with-completion "Filter by tag: " notmuch-search-query-string)))
   (notmuch-search (concat notmuch-search-query-string " and tag:" tag) notmuch-search-oldest-first))
 
 ;;;###autoload