From 7e98fee44a4c4d37f6fb5fdf33f739d86000b842 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Tue, 14 Jan 2003 07:59:36 +0000 Subject: [PATCH] Synch with Oort Gnus. --- lisp/ChangeLog | 5 +++++ lisp/gnus-msg.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 604212b..f0aada3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2003-01-14 Katsumi Yamaoka + + * gnus-msg.el (gnus-inews-add-send-actions): Allow a list of + articles to be marked as well. + 2002-01-11 Kevin Greiner * gnus-agent.el (gnus-agent-get-undownloaded-list): Include the fictious headers generated by nnagent (ie. Undownloaded Article diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el index bf685f8..dde2f37 100644 --- a/lisp/gnus-msg.el +++ b/lisp/gnus-msg.el @@ -547,7 +547,7 @@ Gcc: header for archiving purposes." `(set-window-configuration ,winconf) 'exit 'postpone 'kill)) (let ((to-be-marked (cond (yanked yanked) - (article (list article)) + (article (if (listp article) article (list article))) (t nil)))) (message-add-action `(when (gnus-buffer-exists-p ,buffer) -- 1.7.10.4