diff options
| author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2012-03-04 22:19:10 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2012-03-04 22:19:10 +0000 |
| commit | ee30fbcdd3813fef35f401702c9fbedfdf837397 (patch) | |
| tree | 862798977d55591fd69b35b2a77b4226f7791e0a /lisp/gnus/gnus-msg.el | |
| parent | f20f95c65cb948ce2b7ff667831dc64471d001fa (diff) | |
| download | emacs-ee30fbcdd3813fef35f401702c9fbedfdf837397.tar.gz | |
gnus-msg.el (gnus-msg-mail): Call `message-mail' correctly when Gnus isn't running (bug#10897).
Diffstat (limited to 'lisp/gnus/gnus-msg.el')
| -rw-r--r-- | lisp/gnus/gnus-msg.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/gnus/gnus-msg.el b/lisp/gnus/gnus-msg.el index bf75f94c195..7c8d194f26b 100644 --- a/lisp/gnus/gnus-msg.el +++ b/lisp/gnus/gnus-msg.el @@ -478,7 +478,8 @@ Thank you for your help in stamping out bugs. ;;;###autoload (defun gnus-msg-mail (&optional to subject other-headers continue - switch-action yank-action send-actions return-action) + switch-action yank-action send-actions + return-action) "Start editing a mail message to be sent. Like `message-mail', but with Gnus paraphernalia, particularly the Gcc: header for archiving purposes. @@ -486,7 +487,8 @@ If Gnus isn't running, a plain `message-mail' setup is used instead." (interactive) (if (not (gnus-alive-p)) - (message-mail) + (message-mail to subject other-headers continue + nil yank-action send-actions return-action) (let ((buf (current-buffer)) mail-buf) (gnus-setup-message 'message |