Commit 57cc52be authored by Lars Magne Ingebrigtsen's avatar Lars Magne Ingebrigtsen Committed by Katsumi Yamaoka
Browse files

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

parent 5f285722
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 * gnus-sum.el (gnus-summary-push-marks-to-backend): Use 'set instead of
'add and 'delete to set backend marks. 'add and 'delete to set backend marks.
   
......
...@@ -928,6 +928,7 @@ textual parts.") ...@@ -928,6 +928,7 @@ textual parts.")
flags)) flags))
(deffoo nnimap-request-set-mark (group actions &optional server) (deffoo nnimap-request-set-mark (group actions &optional server)
(debug)
(when (nnimap-possibly-change-group group server) (when (nnimap-possibly-change-group group server)
(let (sequence) (let (sequence)
(with-current-buffer (nnimap-buffer) (with-current-buffer (nnimap-buffer)
...@@ -943,7 +944,7 @@ textual parts.") ...@@ -943,7 +944,7 @@ textual parts.")
(nnimap-article-ranges range) (nnimap-article-ranges range)
(cond (cond
((eq action 'del) "-") ((eq action 'del) "-")
((eq action 'add) "-") ((eq action 'add) "+")
((eq action 'set) "")) ((eq action 'set) ""))
(mapconcat #'identity flags " "))))))) (mapconcat #'identity flags " ")))))))
;; Wait for the last command to complete to avoid later ;; Wait for the last command to complete to avoid later
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment