fix

diff --git a/wl/ChangeLog b/wl/ChangeLog
index d8b1d97..f620972 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-16  TAKAHASHI Kaoru  <kaoru@kaisei.org>

diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index 6a28dd5..3a2e222 100644 (file)
--- 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)