* nnimap.el (nnimap-request-set-mark): Add is "+", not "-".

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3af26f2..4c99f20 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2010-11-26  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
 2010-11-26  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 

+       * 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.
 
        * gnus-sum.el (gnus-summary-push-marks-to-backend): Use 'set instead of
        'add and 'delete to set backend marks.
 

diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index 0a0b413..307deba 100644 (file)
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -928,6 +928,7 @@ textual parts.")
     flags))
 
 (deffoo nnimap-request-set-mark (group actions &optional server)
     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)
   (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) "-")
                                (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
                                 ((eq action 'set) ""))
                                (mapconcat #'identity flags " ")))))))
        ;; Wait for the last command to complete to avoid later