From ee919105863b54c68eb83788483c4035e141a216 Mon Sep 17 00:00:00 2001 From: hmurata Date: Thu, 10 May 2001 00:52:19 +0000 Subject: [PATCH] * wl-summary.el (wl-summary-exec-subr): Fixed problem when destination folder is 'null. --- wl/ChangeLog | 5 +++++ wl/wl-summary.el | 6 ++++-- 2 files changed, 9 insertions(+), 2 deletions(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index ef922eb..e6f88ba 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2001-05-10 Hiroya Murata + + * wl-summary.el (wl-summary-exec-subr): Fixed problem when + destination folder is 'null. + 2001-05-09 Kenichi OKADA * wl-folder.el (wl-folder-guess-mailing-list-by-refile-rule-subr): diff --git a/wl/wl-summary.el b/wl/wl-summary.el index 73659b7..21700f2 100644 --- a/wl/wl-summary.el +++ b/wl/wl-summary.el @@ -3092,8 +3092,10 @@ If optional argument NUMBER is specified, mark message specified by NUMBER." (setq result (elmo-folder-move-messages wl-summary-buffer-elmo-folder (cdr (car dst-msgs)) - (wl-folder-get-elmo-folder - (car (car dst-msgs))) + (if (eq 'null (car (car dst-msgs))) + 'null + (wl-folder-get-elmo-folder + (car (car dst-msgs)))) (wl-summary-buffer-msgdb) refile-len refile-executed -- 1.7.10.4