From 998768afd27ecfc8bea7549a84208e0fe204d33b Mon Sep 17 00:00:00 2001 From: Thierry Volpiatto Date: Sat, 4 May 2013 15:34:19 -0400 Subject: [PATCH] * lisp/gnus/message.el (message-bury): Make `buffer' optional. (message-send-and-exit): Don't pass `buf' so as to hide the buffer. Fixes: debbugs:14085 --- lisp/gnus/ChangeLog | 6 ++++++ lisp/gnus/message.el | 4 ++-- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 1221f163cba..bca0933437d 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,9 @@ +2013-05-04 Thierry Volpiatto + + * message.el (message-bury): Make `buffer' optional. + (message-send-and-exit): Don't pass `buf' so as to hide the buffer + (bug#14085). + 2013-05-01 Katsumi Yamaoka * gnus-util.el (gnus-emacs-completing-read): Fix a filter for XEmacs. diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index a6638097b47..ad077b4da23 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -4047,7 +4047,7 @@ It should typically alter the sending method in some way or other." (actions message-exit-actions)) (when (and (message-send arg) (buffer-name buf)) - (message-bury buf) + (message-bury) (if message-kill-buffer-on-exit (kill-buffer buf)) (message-do-actions actions) @@ -4095,7 +4095,7 @@ Instead, just auto-save the buffer and then bury it." (message-disassociate-draft))) (message-do-actions actions)))) -(defun message-bury (buffer) +(defun message-bury (&optional buffer) "Bury this mail BUFFER." (if message-return-action (progn -- 2.39.2