From 4d67c85d447e8f3348d573ff7f9eb35821157ddb Mon Sep 17 00:00:00 2001 From: yoichi Date: Thu, 22 Jun 2006 23:34:09 +0000 Subject: [PATCH] * wl-thread.el (wl-thread-force-open): Arranged. --- wl/ChangeLog | 4 ++++ wl/wl-thread.el | 7 +++---- 2 files changed, 7 insertions(+), 4 deletions(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index de3ee0e..3349c74 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,7 @@ +2006-06-22 Yoichi NAKAYAMA + + * wl-thread.el (wl-thread-force-open): Arranged. + 2006-06-19 Yoichi NAKAYAMA * wl-folder.el (wl-folder-complete-filter-condition): Remove ! diff --git a/wl/wl-thread.el b/wl/wl-thread.el index b6965bc..398c562 100644 --- a/wl/wl-thread.el +++ b/wl/wl-thread.el @@ -782,10 +782,9 @@ Message is inserted to the summary buffer." (defun wl-thread-force-open (&optional msg-num) "force open current folder" - (if msg-num - (wl-summary-jump-to-msg msg-num)) - (let ((wl-thread-insert-force-opened t)) - (wl-thread-open-close))) + (when msg-num + (wl-summary-jump-to-msg msg-num)) + (wl-thread-open-close 'force-open)) (defun wl-thread-entity-force-open (entity) (let ((wl-thread-insert-force-opened t) -- 1.7.10.4