From: yoichi Date: Wed, 19 Jan 2005 15:44:17 +0000 (+0000) Subject: * wl-summary.el (wl-summary-goto-folder-subr): Avoid error for X-Git-Tag: wl-2_14-root~82 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=967e357aa2210160ba49d1b08cce896006c5d6e1;p=elisp%2Fwanderlust.git * wl-summary.el (wl-summary-goto-folder-subr): Avoid error for `wl-message-buffer-prefetch-depth' is nil though it is illegal. (wl-summary-redisplay-internal): Ditto. --- diff --git a/wl/ChangeLog b/wl/ChangeLog index e79a2ee..41e36ac 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,5 +1,9 @@ 2005-01-19 Yoichi NAKAYAMA + * wl-summary.el (wl-summary-goto-folder-subr): Avoid error for + `wl-message-buffer-prefetch-depth' is nil though it is illegal. + (wl-summary-redisplay-internal): Ditto. + * wl-summary.el (wl-summary-goto-folder-subr): Protect current message (the condition is borrowed from `wl-check-variables-2'). (wl-summary-redisplay-internal): Ditto. diff --git a/wl/wl-summary.el b/wl/wl-summary.el index 506b4b1..de8f6a5 100644 --- a/wl/wl-summary.el +++ b/wl/wl-summary.el @@ -2514,7 +2514,7 @@ If ARG, without confirm." (wl-message-buffer-prefetch folder (wl-summary-message-number) - (min wl-message-buffer-prefetch-depth + (min (or wl-message-buffer-prefetch-depth 0) (1- wl-message-buffer-cache-size)) (current-buffer) wl-summary-buffer-mime-charset)) @@ -4596,7 +4596,7 @@ If ARG is numeric number, decode message as following: (wl-highlight-summary-displaying) (wl-message-buffer-prefetch-next folder num - (min wl-message-buffer-prefetch-depth + (min (or wl-message-buffer-prefetch-depth 0) (1- wl-message-buffer-cache-size)) (current-buffer) wl-summary-buffer-mime-charset)