* wl-vars.el (wl-folder-process-duplicates-alist): Fixed

typo (kill->hide).
(wl-message-buffer-prefetch-folder-type-list): Added elements
`mark' and `cache' instead of `internal'.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index a1f3830..4ca4a4a 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,10 @@
+2001-12-01  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+       * wl-vars.el (wl-folder-process-duplicates-alist): Fixed
+       typo (kill->hide).
+       (wl-message-buffer-prefetch-folder-type-list): Added elements
+       `mark' and `cache' instead of `internal'.
+
 2001-11-30  Yuuichi Teranishi  <teranisi@gohome.org>
 
        * wl-acap.el (wl-acap-init): If initialization via ACAP is interrupted,

diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index 9a153ae..c75e873 100644 (file)
--- a/wl/wl-vars.el
+++ b/wl/wl-vars.el
@@ -1639,7 +1639,7 @@ See also variable `wl-summary-next-no-unread-command'."
 (defcustom wl-message-buffer-prefetch-folder-type-list t
   "*All folder types that match this list prefetch next message,
 and reserved buffer cache."
-  :type '(choice (const :tag "all" t)
+  :type `(choice (const :tag "all" t)
                 (const :tag "never" nil)
                 (set (const localdir)
                      (const localnews)
@@ -1650,7 +1650,8 @@ and reserved buffer cache."
                      (const shimbun)
                      (const nmz)
                      (const archive)
-                     (const internal)))
+                     (const mark)
+                     (const cache)))
   :group 'wl-pref)
 
 (defcustom wl-message-buffer-prefetch-folder-list nil
@@ -1775,7 +1776,7 @@ TYPE is one of the symbols `hide' or `read'.
 `read' means mark as read duplicated messages.
 If TYPE is nil, do nothing for duplicated messages."
   :type '(repeat (cons (regexp :tag "Folder regexp")
-                      (choice (const :tag "Hide" kill)
+                      (choice (const :tag "Hide" hide)
                               (const :tag "Mark as read" read))))
   :group 'wl-folder)