* wl-summary.el (wl-summary-msgdb-load-async): Call

`elmo-imap4-spec-mailbox' instead of `elmo-imap4-spec-folder'.

diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index e975a44..87d72d7 100644 (file)
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -709,7 +709,7 @@ Returns nil if selecting folder was in failure."
                (elmo-imap4-send-command (process-buffer process)
                                         process
                                         (format "select \"%s\"" 
-                                                (elmo-imap4-spec-folder
+                                                (elmo-imap4-spec-mailbox
                                                  spec)))
                (setq msgdb (elmo-msgdb-load (elmo-string folder)))
                (setq response (elmo-imap4-read-response 
@@ -719,7 +719,7 @@ Returns nil if selecting folder was in failure."
                (progn
                  (setcar (cddr connection) nil)
                  (error "Select folder failed"))
-             (setcar (cddr connection) (elmo-imap4-spec-folder spec))))
+             (setcar (cddr connection) (elmo-imap4-spec-mailbox spec))))
          (if response msgdb)))
     (elmo-msgdb-load (elmo-string folder))))