[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master d5427e7: Disable MOVE more for Dovecot
From: |
Lars Ingebrigtsen |
Subject: |
[Emacs-diffs] master d5427e7: Disable MOVE more for Dovecot |
Date: |
Mon, 14 Mar 2016 19:23:38 +0000 |
branch: master
commit d5427e71da28856c5e43396a37ffd0c906947499
Author: Lars Magne Ingebrigtsen <address@hidden>
Commit: Lars Magne Ingebrigtsen <address@hidden>
Disable MOVE more for Dovecot
* lisp/gnus/nnimap.el (nnimap-process-expiry-targets): Also
disable MOVE when expirying.
(nnimap-split-incoming-mail): And when splitting mail.
---
lisp/gnus/nnimap.el | 6 ++++--
1 files changed, 4 insertions(+), 2 deletions(-)
diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index 90de168..2e2ec59 100644
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -997,7 +997,8 @@ textual parts.")
(and (nnimap-change-group group server)
(with-current-buffer (nnimap-buffer)
(nnheader-message 7 "Expiring articles from %s: %s" group articles)
- (let ((can-move (nnimap-capability "MOVE")))
+ (let ((can-move (and (nnimap-capability "MOVE")
+ (equal (nnimap-quirk "MOVE") "MOVE"))))
(nnimap-command
(if can-move
"UID MOVE %s %S"
@@ -2068,7 +2069,8 @@ Return the server's response to the SELECT or EXAMINE
command."
nnmail-split-fancy))
(nnmail-inhibit-default-split-group t)
(groups (nnimap-get-groups))
- (can-move (nnimap-capability "MOVE"))
+ (can-move (and (nnimap-capability "MOVE")
+ (equal (nnimap-quirk "MOVE") "MOVE")))
new-articles)
(erase-buffer)
(nnimap-command "SELECT %S" nnimap-inbox)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master d5427e7: Disable MOVE more for Dovecot,
Lars Ingebrigtsen <=