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

Forward individual messages using message-forward

Browse source 
Sometimes forwarding a message is preferable to replying and modifying
the set of recipients.  This commit provides that ability using the
message-forward function.
This commit is contained in:
Keith Amidon 2009-11-27 05:30:11 -08:00 committed by Carl Worth
parent c4463d4cb4
commit 07ce64e435
1 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
notmuch.el
View file

@ -62,6 +62,7 @@
; overlays-at to query and manipulate the current overlay.
(define-key map "a" 'notmuch-show-archive-thread)
(define-key map "A" 'notmuch-show-mark-read-then-archive-thread)
(define-key map "f" 'notmuch-show-forward-current)
(define-key map "m" 'message-mail)
(define-key map "n" 'notmuch-show-next-message)
(define-key map "N" 'notmuch-show-mark-read-then-next-open-message)
@ -316,6 +317,12 @@ buffer."
(let ((message-id (notmuch-show-get-message-id)))
(notmuch-reply message-id)))
(defun notmuch-show-forward-current ()
"Forward a the current message."
(interactive)
(with-current-notmuch-show-message
(message-forward)))
(defun notmuch-show-pipe-message (command)
"Pipe the contents of the current message to the given command.