From 8ed27bdf88cab134c26f3609c4d11c574f74705c Mon Sep 17 00:00:00 2001 From: Lars Magne Ingebrigtsen Date: Mon, 14 Mar 2016 20:21:02 +0100 Subject: [PATCH] Don't use MOVE on Dovecot * lisp/gnus/nnimap.el (nnimap-request-move-article): Don't use MOVE on Dovecot, since it's broken in many versions. (nnimap-quirks): Mark MOVE on Dovecot as non-working. --- lisp/gnus/nnimap.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el index fc9304f672b..90de1682861 100644 --- a/lisp/gnus/nnimap.el +++ b/lisp/gnus/nnimap.el @@ -157,7 +157,8 @@ textual parts.") (forward "gnus-forward"))) (defvar nnimap-quirks - '(("QRESYNC" "Zimbra" "QRESYNC "))) + '(("QRESYNC" "Zimbra" "QRESYNC ") + ("MOVE" "Dovecot" nil))) (defvar nnimap-inhibit-logging nil) @@ -929,7 +930,8 @@ textual parts.") (let ((message-id (message-field-value "message-id"))) (if internal-move-group (with-current-buffer (nnimap-buffer) - (let* ((can-move (nnimap-capability "MOVE")) + (let* ((can-move (and (nnimap-capability "MOVE") + (equal (nnimap-quirk "MOVE") "MOVE"))) (command (if can-move "UID MOVE %d %S" "UID COPY %d %S")) -- 2.39.5