From 98b34efb864ee7c24454c1d300a6046fc1fc644b Mon Sep 17 00:00:00 2001
From: keiichi <keiichi>
Date: Mon, 10 Aug 1998 05:34:52 +0000
Subject: [PATCH] For citing any message.

---
 lisp/message.el |    2 ++
 1 file changed, 2 insertions(+)

diff --git a/lisp/message.el b/lisp/message.el
index 1b4e2ca..e252079 100644
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -1721,6 +1721,8 @@ prefix, and don't delete any headers."
   (let ((modified (buffer-modified-p)))
     (when (and message-reply-buffer
 	       message-cite-function)
+      (gnus-copy-article-buffer)
+      (setq message-reply-buffer gnus-article-copy)
       (delete-windows-on message-reply-buffer t)
       (insert-buffer message-reply-buffer)
       (funcall message-cite-function)
-- 
1.7.10.4