[gnus git] branch no-gnus updated: m0-1-79-g807fb44 =1= Fix the mail user agent when Gnus isn't running
Lars Magne Ingebrigtsen <[email protected]>
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via 807fb446106d01ec180a490faa62d087009c2bfd (commit)
from a45ac31f4b4910662f5f478526c3b975b3e7e464 (commit)
- Log -----------------------------------------------------------------
commit 807fb446106d01ec180a490faa62d087009c2bfd
Author: Thierry Volpiatto <[email protected]>
Date: Sun Mar 4 16:01:48 2012 +0100
Fix the mail user agent when Gnus isn't running
* gnus-msg.el (gnus-msg-mail): Call `message-mail' correctly when Gnus
isn't running (bug#10897).
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f166c89..43cd767 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-03-04 Thierry Volpiatto <[email protected]>
+
+ * gnus-msg.el (gnus-msg-mail): Call `message-mail' correctly when Gnus
+ isn't running (bug#10897).
+
2012-03-03 Lars Magne Ingebrigtsen <[email protected]>
* tls.el (open-tls-stream): Don't set the dont-query-on-exit flag.
diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el
index bf75f94..7c8d194 100644
--- a/lisp/gnus-msg.el
+++ b/lisp/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
-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.
Summary of changes:
lisp/ChangeLog | 5 +++++
lisp/gnus-msg.el | 6 ++++--
2 files changed, 9 insertions(+), 2 deletions(-)
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".
The branch, no-gnus has been updated
hooks/post-receive
--
Gnus Project