* elmo-net.el (elmo-folder-list-messages-plugged): Changed default

return value to t.
(elmo-folder-list-messages-unplugged): Return t if
elmo-enable-disconnected-operation is nil.

* elmo-pop3.el (elmo-folder-list-messages-plugged): Renamed from
`elmo-folder-list-messages-internal'.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index f413e31..4374a77 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,13 @@
+2002-01-07  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+       * elmo-net.el (elmo-folder-list-messages-plugged): Changed default
+       return value to t.
+       (elmo-folder-list-messages-unplugged): Return t if
+       elmo-enable-disconnected-operation is nil.
+
+       * elmo-pop3.el (elmo-folder-list-messages-plugged): Renamed from
+       `elmo-folder-list-messages-internal'.
+
 2002-01-07  Kenichi OKADA  <okada@opaopa.org>
 
        * elmo-nntp.el (elmo-nntp-read-response): Added `error-msg' argument.

diff --git a/elmo/elmo-net.el b/elmo/elmo-net.el
index 0fe45a3..1d59733 100644 (file)
--- a/elmo/elmo-net.el
+++ b/elmo/elmo-net.el
@@ -362,7 +362,7 @@ Returned value is searched from `elmo-network-stream-type-alist'."
 
 (luna-define-method elmo-folder-list-messages-plugged
   ((folder elmo-net-folder))
-  t)
+  nil)
 
 ;; Should consider offline append and removal.
 (luna-define-method elmo-folder-list-messages-unplugged ((folder
@@ -380,7 +380,7 @@ Returned value is searched from `elmo-network-stream-type-alist'."
         ;; append appending messages
         (mapcar (lambda (x) (* -1 x))
                 (elmo-dop-spool-folder-list-messages folder))))
-    (error "Unplugged")))
+    t))
 
 (luna-define-method elmo-folder-list-unreads-internal
   ((folder elmo-net-folder) unread-marks &optional mark-alist)

diff --git a/elmo/elmo-pop3.el b/elmo/elmo-pop3.el
index 9c7dc63..89e2ad0 100644 (file)
--- a/elmo/elmo-pop3.el
+++ b/elmo/elmo-pop3.el
@@ -576,7 +576,7 @@ Debug information is inserted in the buffer \"*POP3 DEBUG*\"")
       (elmo-pop3-list-by-uidl-subr folder)
     (elmo-pop3-list-by-list folder)))
 
-(luna-define-method elmo-folder-list-messages-internal
+(luna-define-method elmo-folder-list-messages-plugged
   ((folder elmo-pop3-folder) &optional nohide)
   (elmo-pop3-folder-list-messages folder))