Hack to avoid adjusting marks for nnimap, which is seldom the right thing to do.

[gnus] / lisp / gnus-sum.el

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 047fa67..2ef0ce6 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -5850,6 +5850,9 @@ If SELECT-ARTICLES, only select those articles from GROUP."
         (types gnus-article-mark-lists)
         marks var articles article mark mark-type
          bgn end)
+    ;; Hack to avoid adjusting marks for imap.
+    (when (eq (car (gnus-find-method-for-group group)) 'nnimap)
+      (setq min 1)
 
     (dolist (marks marked-lists)
       (setq mark (car marks)