aboutsummaryrefslogtreecommitdiffhomepage
path: root/emacs
diff options
context:
space:
mode:
authorGravatar Jani Nikula <jani@nikula.org>2012-09-06 18:32:41 +0300
committerGravatar David Bremner <bremner@debian.org>2012-09-19 08:05:59 -0300
commit1548751041d6d19984611e0868dfcb9553b850e7 (patch)
tree3875659acd16533b0a906c6e3719353a59f09bc1 /emacs
parentd5dcfc714e13256cb2084b30d3506a4abc990a51 (diff)
emacs: add support for reversing notmuch-search-archive-thread tag changes
Since archiving a thread can now be a user customized set of tag changes, make reversing this easier. Allow a prefix argument to notmuch-search-archive-thread to reverse the archiving, similar to the unarchiving in notmuch-show-archive-message.
Diffstat (limited to 'emacs')
-rw-r--r--emacs/notmuch.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/emacs/notmuch.el b/emacs/notmuch.el
index 64caa3ea..a8a85ce7 100644
--- a/emacs/notmuch.el
+++ b/emacs/notmuch.el
@@ -593,7 +593,7 @@ See `notmuch-tag' for information on the format of TAG-CHANGES."
(interactive)
(notmuch-search-tag "-"))
-(defun notmuch-search-archive-thread ()
+(defun notmuch-search-archive-thread (&optional unarchive)
"Archive the currently selected thread.
Archive each message in the currently selected thread by applying
@@ -603,10 +603,10 @@ messages will be \"unarchived\" (i.e. the tag changes in
`notmuch-archive-tags' will be reversed).
This function advances the next thread when finished."
- (interactive)
+ (interactive "P")
(when notmuch-archive-tags
(notmuch-search-tag
- (notmuch-tag-change-list notmuch-archive-tags)))
+ (notmuch-tag-change-list notmuch-archive-tags unarchive)))
(notmuch-search-next-thread))
(defun notmuch-search-update-result (result &optional pos)