From 57cc52bed4948a83d605ff7d50ce52da1d9f5da0 Mon Sep 17 00:00:00 2001 From: Lars Magne Ingebrigtsen Date: Fri, 26 Nov 2010 02:17:55 +0000 Subject: [PATCH] nnimap.el (nnimap-request-set-mark): Add is "+", not "-". --- lisp/gnus/ChangeLog | 2 ++ lisp/gnus/nnimap.el | 3 ++- 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 2705413d2c8..f1340c6593d 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,5 +1,7 @@ 2010-11-26 Lars Magne Ingebrigtsen + * nnimap.el (nnimap-request-set-mark): Add is "+", not "-". + * gnus-sum.el (gnus-summary-push-marks-to-backend): Use 'set instead of 'add and 'delete to set backend marks. diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el index 0a0b413d3d2..307deba8afd 100644 --- a/lisp/gnus/nnimap.el +++ b/lisp/gnus/nnimap.el @@ -928,6 +928,7 @@ textual parts.") flags)) (deffoo nnimap-request-set-mark (group actions &optional server) + (debug) (when (nnimap-possibly-change-group group server) (let (sequence) (with-current-buffer (nnimap-buffer) @@ -943,7 +944,7 @@ textual parts.") (nnimap-article-ranges range) (cond ((eq action 'del) "-") - ((eq action 'add) "-") + ((eq action 'add) "+") ((eq action 'set) "")) (mapconcat #'identity flags " "))))))) ;; Wait for the last command to complete to avoid later -- 2.39.5