emacs/tree: add notmuch-tree-archive-thread-then-exit

This is the notmuch-tree version of
notmuch-show-archive-thread-then-exit

Signed-off-by: William Casarin <jb55@jb55.com>
This commit is contained in:
William Casarin 2020-04-04 13:41:41 -07:00 committed by David Bremner
parent 1abe5a0c5b
commit 86f3cc265a

View file

@ -617,6 +617,12 @@ message will be \"unarchived\", i.e. the tag changes in
(notmuch-tree-archive-message unarchive) (notmuch-tree-archive-message unarchive)
(notmuch-tree-next-matching-message)) (notmuch-tree-next-matching-message))
(defun notmuch-tree-archive-thread-then-exit ()
"Archive all messages in the current buffer, then exit notmuch-tree."
(interactive)
(notmuch-tree-archive-thread)
(notmuch-tree-quit t))
(defun notmuch-tree-archive-message-then-next-or-exit () (defun notmuch-tree-archive-message-then-next-or-exit ()
"Archive current message, then show next open message in current thread. "Archive current message, then show next open message in current thread.