* wl-summary.el (wl-summary-exec-subr): Fixed problem when

destination folder is 'null.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index ef922eb..e6f88ba 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2001-05-10  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+       * wl-summary.el (wl-summary-exec-subr): Fixed problem when
+       destination folder is 'null.
+
 2001-05-09  Kenichi OKADA  <okada@opaopa.org>
 
        * 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 (file)
--- 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