debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-11-25 04:18:08 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

emacs: add message archiving functions

Browse source 
This adds two new message archiving functions that parallel the thread
archiving functions: notmuch-show-archive-message{,-then-next}.  The
former also takes a prefix argument to unarchive the message (ie. put
back in inbox).
This commit is contained in:
Jameson Graef Rollins 2012-01-24 16:06:19 -08:00 committed by David Bremner
parent be05158b69
commit 436c98a973
1 changed files with 17 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
emacs/notmuch-show.el
View file

@ -1622,6 +1622,23 @@ buffer."
(notmuch-show-archive-thread) (notmuch-show-archive-thread)
(notmuch-show-next-thread)) (notmuch-show-next-thread))
(defun notmuch-show-archive-message (&optional unarchive)
"Archive the current message.
If a prefix argument is given, the message will be
\"unarchived\" (ie. the \"inbox\" tag will be added instead of
removed)."
(interactive "P")
(if unarchive
(notmuch-show-add-tag "inbox")
(notmuch-show-remove-tag "inbox")))
(defun notmuch-show-archive-message-then-next ()
"Archive the current message, then show the next open message in the current thread."
(interactive)
(notmuch-show-archive-message)
(notmuch-show-next-open-message))
(defun notmuch-show-stash-cc () (defun notmuch-show-stash-cc ()
"Copy CC field of current message to kill-ring." "Copy CC field of current message to kill-ring."
(interactive) (interactive)