From: teranisi Date: Wed, 1 Nov 2000 01:02:55 +0000 (+0000) Subject: * wl-summary.el (wl-summary-auto-refile): Use `wl-folder-get-realname'. X-Git-Tag: wl-2_4-root~27 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=dd0c1883e947b5d733bda0de8cde2679362615cf;p=elisp%2Fwanderlust.git * wl-summary.el (wl-summary-auto-refile): Use `wl-folder-get-realname'. --- diff --git a/wl/ChangeLog b/wl/ChangeLog index bef9f1d..ac184f0 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -3,6 +3,7 @@ * wl-summary.el (wl-summary-read-folder): Fixed problem when petname folder default was selected. (Fix by HIROSE Yuuji ) + (wl-summary-auto-refile): Use `wl-folder-get-realname'. 2000-10-31 Yuuichi Teranishi diff --git a/wl/wl-summary.el b/wl/wl-summary.el index 124a01c..ad0ccbc 100644 --- a/wl/wl-summary.el +++ b/wl/wl-summary.el @@ -3606,9 +3606,10 @@ If optional argument NUMBER is specified, mark message specified by NUMBER." (when (and (not (wl-summary-no-auto-refile-message-p number mark-alist)) (setq dst - (wl-refile-guess-by-rule - (elmo-msgdb-overview-get-entity - number wl-summary-buffer-msgdb))) + (wl-folder-get-realname + (wl-refile-guess-by-rule + (elmo-msgdb-overview-get-entity + number wl-summary-buffer-msgdb)))) (not (equal dst spec))) (when (not (member dst checked-dsts)) (wl-folder-confirm-existence dst)