fix

diff --git a/wl/ChangeLog b/wl/ChangeLog
index eda89bb..8d9accb 100644 (file)
--- 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-11  Katsumi Yamaoka  <yamaoka@jpl.org>

diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index 2a7d111..930f3b4 100644 (file)
--- a/wl/wl-vars.el
+++ b/wl/wl-vars.el
@@ -1206,7 +1206,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)