Fix type of wl-summary-width to accept nil.

(Reported by Reuben Thomas <rrt@dcs.gla.ac.uk>).

diff --git a/wl/ChangeLog b/wl/ChangeLog
index e310aab..eda89bb 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2001-09-17  Yoichi NAKAYAMA <yoichi@eken.phys.nagoya-u.ac.jp>
+
+       * wl-vars.el (wl-summary-width): Fix type to accept nil.
+       (Reported by Reuben Thomas <rrt@dcs.gla.ac.uk>).
+
 2001-09-11  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * wl-vars.el (wl-biff-state-indicator-on): Use `*iso-2022-jp*'

diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index dbd2100..2a7d111 100644 (file)
--- a/wl/wl-vars.el
+++ b/wl/wl-vars.el
@@ -1246,7 +1246,8 @@ with wl-highlight-folder-many-face."
 
 (defcustom wl-summary-width 80
   "*Set summary line width if non nil."
-  :type 'integer
+  :type '(choice (const :tag "Don't truncate" nil)
+                integer)
   :group 'wl-summary
   :group 'wl-pref)