From e0b830410aa1c64942a50ca7dd46bee9a496d86d Mon Sep 17 00:00:00 2001 From: Carl Worth Date: Tue, 3 Nov 2009 17:18:04 -0800 Subject: [PATCH] notmuch.el: Make archive-thread advance to next line. This is the command in notmuch-search mode and it's cer convenient for it to advance to the next line there. (It would be even more convenient if it didn't also take forever, but as mentioned before that's an issue we'll need to fix in Xapian.) --- notmuch.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/notmuch.el b/notmuch.el index 989450a6..0050dd92 100644 --- a/notmuch.el +++ b/notmuch.el @@ -445,8 +445,12 @@ Does nothing if already on the first message in the buffer." (notmuch-search-set-tags (delete tag (notmuch-search-get-tags)))) (defun notmuch-search-archive-thread () + "Archive the current thread (remove its \"inbox\" tag). + +This function advances point to the next line when finished." (interactive) - (notmuch-search-remove-tag "inbox")) + (notmuch-search-remove-tag "inbox") + (next-line)) (defun notmuch-search (query) "Run \"notmuch search\" with the given query string and display results."