Synch with Oort Gnus.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 731a201..6483ffd 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2002-04-18  Josh Huber  <huber@alum.wpi.edu>
+
+       * message.el (message-gen-unsubscribed-mft): accept a prefix
+       argument so CC can be included with C-u C-c C-f C-a
+
 2002-04-17  Kai Gro\e,A_\e(Bjohann  <Kai.Grossjohann@CS.Uni-Dortmund.DE>
        From Ted Zlatanov <teodor.zlatanov@divine.com>.
 

diff --git a/lisp/message.el b/lisp/message.el
index c297963..cba3cc5 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -2229,7 +2229,7 @@ in the current mail buffer, and appends the current user-mail-address.
 If the optional argument `include-cc' is non-nil, the addresses in the
 Cc: header are also put into the MFT."
 
-  (interactive)
+  (interactive "P")
   (message-remove-header "Mail-Followup-To")
   (let* ((cc (and include-cc (message-fetch-field "Cc")))
         (tos (if cc