From abeaf9cda0b3dcfccf0fb1ec8a1be2c57bfa56b0 Mon Sep 17 00:00:00 2001 From: teranisi Date: Mon, 9 Jul 2001 10:05:34 +0000 Subject: [PATCH] * wl-summary.el (wl-summary-forward): Use cache if it is not section cache. --- wl/ChangeLog | 5 +++++ wl/wl-summary.el | 9 ++++++++- 2 files changed, 13 insertions(+), 1 deletion(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index ff1fd4d..5429031 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2001-07-09 Yuuichi Teranishi + + * wl-summary.el (wl-summary-forward): Use cache if it is not + section cache. + 2001-07-05 Yuuichi Teranishi * wl-vars.el: Changed file coding system to ISO-2022-JP. diff --git a/wl/wl-summary.el b/wl/wl-summary.el index 21fc2ab..7f11f43 100644 --- a/wl/wl-summary.el +++ b/wl/wl-summary.el @@ -4945,7 +4945,14 @@ Use function list is `wl-summary-write-current-folder-functions'." entity subject num) (if (null number) (message "No message.") - (wl-summary-redisplay-internal nil nil 'force-reload) + (if (and (elmo-message-use-cache-p folder number) + (eq (elmo-file-cache-status + (elmo-file-cache-get + (elmo-message-field folder number 'message-id))) + 'section)) + ;; Reload. + (wl-summary-redisplay-internal nil nil 'force-reload) + (wl-summary-redisplay-internal folder number)) (setq mes-buf wl-message-buffer) (wl-message-select-buffer mes-buf) (unless wl-draft-use-frame -- 1.7.10.4