Synch up with main trunk.

[elisp/wanderlust.git] / elmo / elmo.el

diff --git a/elmo/elmo.el b/elmo/elmo.el
index f4e9849..ad62248 100644 (file)
--- a/elmo/elmo.el
+++ b/elmo/elmo.el
@@ -378,7 +378,7 @@ NUMBERS is a list of message numbers to be processed.")
 FOLDER is the destination folder(ELMO folder structure).
 If UNREAD is non-nil, message is appended as unread.
 If optional argument NUMBER is specified, the new message number is set
-(if possible).")
+\(if possible\).")
 
 (luna-define-generic elmo-folder-append-messages (folder
                                                  src-folder
@@ -1117,9 +1117,12 @@ Return a cons cell of (NUMBER-CROSSPOSTS . NEW-MARK-ALIST).")
        folder
        (elmo-folder-expand-msgdb-path folder))))
 
-(defun elmo-message-cached-p (folder number)
-  "Get cache status of the message in the msgdb."
-  (elmo-msgdb-get-cached (elmo-folder-msgdb folder) number))
+(defun elmo-message-accessible-p (folder number)
+  "Get accessibility of the message.
+Return non-nil when message is accessible."
+  (or (elmo-folder-plugged-p folder)
+      (elmo-folder-local-p folder)
+      (elmo-msgdb-get-cached (elmo-folder-msgdb folder) number)))
 
 (defun elmo-message-set-cached (folder number cached)
   "Set cache status of the message in the msgdb.