From 178075bf67531b3ffee3f5540192da03d245e7ad Mon Sep 17 00:00:00 2001 From: hmurata Date: Mon, 7 Jan 2002 13:49:09 +0000 Subject: [PATCH] * 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'. --- elmo/ChangeLog | 10 ++++++++++ elmo/elmo-net.el | 4 ++-- elmo/elmo-pop3.el | 2 +- 3 files changed, 13 insertions(+), 3 deletions(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index f413e31..4374a77 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,13 @@ +2002-01-07 Hiroya Murata + + * 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 * 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 --- 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 --- 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)) -- 1.7.10.4