(gnus-summary-supersede-article): Add Gcc header.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5ffa428..f0a7a4d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2007-04-20  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * gnus-msg.el (gnus-summary-supersede-article): Add Gcc header.
+
 2007-04-19  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * gnus-art.el (gnus-mime-strip-charset-parameters): New function.

diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el
index ae962b9..4c84d83 100644 (file)
--- a/lisp/gnus-msg.el
+++ b/lisp/gnus-msg.el
@@ -831,7 +831,9 @@ header line with the old Message-ID."
               (set-buffer ,gnus-summary-buffer)
               (gnus-cache-possibly-remove-article ,article nil nil nil t)
               (gnus-summary-mark-as-read ,article gnus-canceled-mark)))))
-       message-send-actions))))
+       message-send-actions)
+      (gnus-inews-insert-archive-gcc)
+      (gnus-inews-insert-gcc))))
 
 \f