From ae6c8be1a889b91c962d39182c31838175f812fc Mon Sep 17 00:00:00 2001 From: Katsumi Yamaoka Date: Sun, 27 May 2012 10:31:24 +0000 Subject: [PATCH] gnus-msg.el (gnus-msg-mail): Ensure that gnus-newsgroup-name is a string so that Gcc works (bug#11514) --- lisp/ChangeLog | 5 +++++ lisp/gnus-msg.el | 1 + 2 files changed, 6 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7f8e0f9ea..00473afd9 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2012-05-27 Katsumi Yamaoka + + * gnus-msg.el (gnus-msg-mail): Ensure that gnus-newsgroup-name is + a string so that Gcc works (bug#11514). + 2012-05-26 Stefan Monnier * legacy-gnus-agent.el (gnus-agent-unhook-expire-days): diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el index 9583ff93d..bdc0195e1 100644 --- a/lisp/gnus-msg.el +++ b/lisp/gnus-msg.el @@ -522,6 +522,7 @@ instead." (message-mail to subject other-headers continue nil yank-action send-actions return-action) (let ((buf (current-buffer)) + (gnus-newsgroup-name (or gnus-newsgroup-name "")) mail-buf) (gnus-setup-message 'message (message-mail to subject other-headers continue -- 2.25.1