From 63b6546f348b848414a479a934568c64568bfc7b Mon Sep 17 00:00:00 2001 From: teranisi Date: Thu, 16 May 2002 14:17:45 +0000 Subject: [PATCH] 2002-05-16 Tatsuya Kinoshita * wl-summary.el (wl-summary-target-mark-refile-sub): Remove a nuisance funcall. --- wl/ChangeLog | 5 +++++ wl/wl-summary.el | 8 +++----- 2 files changed, 8 insertions(+), 5 deletions(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index 39a790d..3178303 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2002-05-16 Tatsuya Kinoshita + + * wl-summary.el (wl-summary-target-mark-refile-sub): + Remove a nuisance funcall. + 2002-05-16 Yuuichi Teranishi * wl-address.el (wl-complete-field-body): Bind `completion-ignore-case' diff --git a/wl/wl-summary.el b/wl/wl-summary.el index 0df8510..96e6f38 100644 --- a/wl/wl-summary.el +++ b/wl/wl-summary.el @@ -3721,11 +3721,9 @@ If ARG, exit virtual folder." number (wl-summary-buffer-msgdb))) (if (null entity) (error "Cannot %s" copy-or-refile)) - (funcall function - (setq folder (wl-summary-read-folder - (wl-refile-guess entity) - (format "for %s" copy-or-refile))) - number) + (setq folder (wl-summary-read-folder + (wl-refile-guess entity) + (format "for %s" copy-or-refile))) (goto-char (point-min)) (while (not (eobp)) (when (string= (wl-summary-temp-mark) "*") -- 1.7.10.4