From 6319919b1827047c469963bf5af00e0ca1a16b24 Mon Sep 17 00:00:00 2001
From: yamaoka <yamaoka>
Date: Thu, 18 Apr 2002 23:07:35 +0000
Subject: [PATCH] Synch with Oort Gnus.

---
 lisp/ChangeLog  |    5 +++++
 lisp/message.el |    2 +-
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 731a201..6483ffd 100644
--- 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,A_(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
--- 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
-- 
1.7.10.4