X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;f=emacs%2Fnotmuch-show.el;h=add273ce154b42968039100f6e099536595396f2;hb=1a8aae6fa7be108819fa848df3dc98e1840f5eba;hp=93c5e53b2d235e0ead9b321011149183422216d1;hpb=784649561abb627a9d81e4f718656dad0b6b6207;p=notmuch

diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el
index 93c5e53b..add273ce 100644
--- a/emacs/notmuch-show.el
+++ b/emacs/notmuch-show.el
@@ -1103,11 +1103,11 @@ any effects from previous calls to
   (interactive)
   (notmuch-mua-reply (notmuch-show-get-message-id)))
 
-(defun notmuch-show-forward-message ()
+(defun notmuch-show-forward-message (&optional prompt-for-sender)
   "Forward the current message."
-  (interactive)
+  (interactive "P")
   (with-current-notmuch-show-message
-   (notmuch-mua-forward-message)))
+   (notmuch-mua-new-forward-message prompt-for-sender)))
 
 (defun notmuch-show-next-message ()
   "Show the next message."