From: markwalters1009 <markwalters1009@gmail.com> Tagging from search mode now passes the tags it believes are present to the completion function. This means that the user interface is more consistent: tag-completion will complete to any tag the user can see (even if it is no longer present). --- emacs/notmuch.el | 5 +++-- 1 files changed, 3 insertions(+), 2 deletions(-) diff --git a/emacs/notmuch.el b/emacs/notmuch.el index 4e6bbcf..4ffa803 100644 --- a/emacs/notmuch.el +++ b/emacs/notmuch.el @@ -567,8 +567,9 @@ and will also appear in a buffer named \"*Notmuch errors*\"." (defun notmuch-search-tag-region (beg end &optional tag-changes) "Change tags for threads in the given region." - (let ((search-string (notmuch-search-find-thread-id-region-search beg end))) - (setq tag-changes (funcall 'notmuch-tag search-string tag-changes)) + (let ((search-string (notmuch-search-find-thread-id-region-search beg end)) + (current-tags (notmuch-search-get-tags-region beg end))) + (setq tag-changes (funcall 'notmuch-tag search-string tag-changes current-tags)) (notmuch-search-foreach-result beg end (lambda (pos) (notmuch-search-set-tags -- 1.7.9.1