From 6fc95a687fd1ac622b7b373f3fb81449b3895284 Mon Sep 17 00:00:00 2001
From: yoichi <yoichi>
Date: Mon, 17 Sep 2001 13:52:42 +0000
Subject: [PATCH] fix

---
 wl/ChangeLog  |    1 +
 wl/wl-vars.el |    2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/wl/ChangeLog b/wl/ChangeLog
index d8b1d97..f620972 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,6 +1,7 @@
 2001-09-17  Yoichi NAKAYAMA <yoichi@eken.phys.nagoya-u.ac.jp>
 
 	* wl-vars.el (wl-summary-width): Fix type to accept nil.
+	(wl-fcc): Fix to accept function.
 	(Reported by Reuben Thomas <rrt@dcs.gla.ac.uk>).
 
 2001-09-16  TAKAHASHI Kaoru  <kaoru@kaisei.org>
diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index 6a28dd5..3a2e222 100644
--- a/wl/wl-vars.el
+++ b/wl/wl-vars.el
@@ -1246,7 +1246,7 @@ with wl-highlight-folder-many-face."
 (defcustom wl-fcc nil
   "*Folder Carbon Copy."
   :type '(choice (const :tag "disable" nil)
-                 string)
+                 string function)
   :group 'wl-draft
   :group 'wl-pref)
 
-- 
1.7.10.4