emacs: Escape tag queries performed by hello

This commit is contained in:
Austin Clements 2012-10-26 16:18:11 -04:00 committed by David Bremner
parent 1a4cb8fd29
commit b235850f9b

View file

@ -500,7 +500,7 @@ Complete list of currently available key bindings:
(defun notmuch-hello-generate-tag-alist (&optional hide-tags) (defun notmuch-hello-generate-tag-alist (&optional hide-tags)
"Return an alist from tags to queries to display in the all-tags section." "Return an alist from tags to queries to display in the all-tags section."
(mapcar (lambda (tag) (mapcar (lambda (tag)
(cons tag (format "tag:%s" tag))) (cons tag (concat "tag:" (notmuch-escape-boolean-term tag))))
(notmuch-remove-if-not (notmuch-remove-if-not
(lambda (tag) (lambda (tag)
(not (member tag hide-tags))) (not (member tag hide-tags)))