(defun elmo-pipe-drain (src dst)
"Move all messages of SRC to DST."
- (let ((elmo-pop3-inhibit-uidl t)) ; No need to use UIDL
+ (let ((elmo-inhibit-number-mapping t)) ; No need to use UIDL
(message "Checking %s..." (elmo-folder-name-internal src))
(elmo-folder-open-internal src)
(elmo-folder-move-messages src (elmo-folder-list-messages src) dst))
(elmo-folder-close-internal(elmo-pipe-folder-dst-internal folder)))
(luna-define-method elmo-folder-list-messages-internal
- ((folder elmo-pipe-folder))
+ ((folder elmo-pipe-folder) &optional nohide)
(elmo-folder-list-messages-internal (elmo-pipe-folder-dst-internal
- folder)))
+ folder) nohide))
(luna-define-method elmo-folder-list-unreads-internal
((folder elmo-pipe-folder) unread-marks &optional mark-alist)
(luna-define-method elmo-folder-status ((folder elmo-pipe-folder))
(elmo-folder-open-internal (elmo-pipe-folder-src-internal folder))
(elmo-folder-open-internal (elmo-pipe-folder-dst-internal folder))
- (let* ((elmo-pop3-inhibit-uidl t)
+ (let* ((elmo-inhibit-number-mapping t)
(src-length (length (elmo-folder-list-messages
(elmo-pipe-folder-src-internal folder))))
(dst-list (elmo-folder-list-messages