If wl-summary-update-confirm-threshold is nil, never confirm.

diff --git a/doc/wl-ja.texi b/doc/wl-ja.texi
index 286133e..a57eb2d 100644 (file)
--- a/doc/wl-ja.texi
+++ b/doc/wl-ja.texi
@@ -3612,7 +3612,7 @@ Non-nil \e$B$J$i\e(B @code{wl-summary-jump-to-msg-by-message-id} \e$B$G!"%a%C%;!<%8
 @item wl-summary-update-confirm-threshold
 @vindex wl-summary-update-confirm-threshold
 \e$B=i4|@_Dj$O\e(B 500\e$B!#$3$NCM$h$j%5%^%j$N99?7?t$,B?$$>l9g!"0lItJ,$@$199?7$9$k$+\e(B
-\e$B$I$&$+!"<ALd$7$^$9!#\e(B
+\e$B$I$&$+!"<ALd$7$^$9!#\e(B`nil' \e$B$K$9$k$H!"3NG'$;$:$KA4$F$r99?7$7$^$9!#\e(B
 
 @item wl-summary-always-sticky-folder-list
 @vindex wl-summary-always-sticky-folder-list

diff --git a/doc/wl.texi b/doc/wl.texi
index 935164f..bae22dd 100644 (file)
--- a/doc/wl.texi
+++ b/doc/wl.texi
@@ -3624,7 +3624,8 @@ cursor position is saved.
 @item wl-summary-update-confirm-threshold
 @vindex wl-summary-update-confirm-threshold
 The initial setting is 500.  If updated message number is larger than
-this value, confirm whether drop them or not.
+this value, confirm whether drop them or not. If `nil', all the message
+will be updated without confirmation.
 
 @item wl-summary-always-sticky-folder-list
 @vindex wl-summary-always-sticky-folder-list

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 1f5a168..40e3617 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,9 @@
+2001-12-06  Hiroshi Tsutsui  <tsutsui@easter.kuee.kyoto-u.ac.jp>
+
+       * wl-vars.el (wl-summary-update-confirm-threshold): The value can
+       be nil, nil means never confirm.
+       * wl-summary.el (wl-summary-confirm-appends): Ditto.
+
 2001-12-06  Yoichi NAKAYAMA  <yoichi@eken.phys.nagoya-u.ac.jp>
 
        * wl-vars.el (wl-subject-length-limit): This value can be nil (nil

diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index f362a36..01d62f9 100644 (file)
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -2020,7 +2020,8 @@ If ARG is non-nil, checking is omitted."
 (defun wl-summary-confirm-appends (appends)
   (let ((len (length appends))
        in)
-    (if (> len wl-summary-update-confirm-threshold)
+    (if (and wl-summary-update-confirm-threshold
+            (> len wl-summary-update-confirm-threshold))
        (if (y-or-n-p (format "Too many messages(%d).  Continue? " len))
            appends
          (setq in wl-summary-update-confirm-threshold)

diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index 354b3c0..f6bf3cd 100644 (file)
--- a/wl/wl-vars.el
+++ b/wl/wl-vars.el
@@ -196,8 +196,10 @@ If you don't have multiple e-mail addresses, you don't have to set this."
   :group 'wl-summary)
 
 (defcustom wl-summary-update-confirm-threshold 500
-  "*Confirm updating summary if message number is larger than this value."
-  :type 'integer
+  "*Confirm updating summary if message number is larger than this value.
+If nil, all the message will be updated without confirmation."
+  :type '(choice (const :tag "Never confirm" nil)
+                integer)
   :group 'wl-summary)
 
 ;; Important folders