X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;f=emacs%2Fnotmuch.el;h=2e0b20eb937095825f442d662e4b8f6a6e038a66;hb=b9a777e0a3983a5b2062e927c5b426ca669da644;hp=047175001c777d0e7fe9dfa26bdb69a0dd668a2d;hpb=6d6006bea95c5ea292ba08490a906eb76481c9fc;p=notmuch diff --git a/emacs/notmuch.el b/emacs/notmuch.el index 04717500..2e0b20eb 100644 --- a/emacs/notmuch.el +++ b/emacs/notmuch.el @@ -649,7 +649,7 @@ foreground and blue background." (let ((tag (car elem)) (attributes (cdr elem))) (when (member tag line-tag-list) - (notmuch-combine-face-text-property start end attributes)))) + (notmuch-apply-face nil attributes nil start end)))) ;; Reverse the list so earlier entries take precedence (reverse notmuch-search-line-faces))) @@ -829,7 +829,7 @@ See `notmuch-tag' for information on the format of TAG-CHANGES." PROMPT is the string to prompt with." (lexical-let ((completions - (append (list "folder:" "thread:" "id:" "date:" "from:" "to:" + (append (list "folder:" "path:" "thread:" "id:" "date:" "from:" "to:" "subject:" "attachment:") (mapcar (lambda (tag) (concat "tag:" (notmuch-escape-boolean-term tag))) @@ -888,6 +888,7 @@ the configured default sort order." (set 'notmuch-search-oldest-first oldest-first) (set 'notmuch-search-target-thread target-thread) (set 'notmuch-search-target-line target-line) + (notmuch-tag-clear-cache) (let ((proc (get-buffer-process (current-buffer))) (inhibit-read-only t)) (if proc