Fix the logic for copying read-ness to the backends.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6120ae5..f1b8697 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2010-12-16  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * gnus-sum.el (gnus-summary-push-marks-to-backend): Fix the logic for
+       copying read-ness to the backends.
+
        * nnimap.el (nnimap-quirk): New function.
        (nnimap-retrieve-group-data-early): Use it.
        (nnimap-quirks): New alist.

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index a021728..ceaa014 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -9958,7 +9958,7 @@ ACTION can be either `move' (the default), `crosspost' or `copy'."
 (defun gnus-summary-push-marks-to-backend (article)
   (let ((set nil)
        (marks gnus-article-mark-lists))
-    (when (memq article gnus-newsgroup-unreads)
+    (unless (memq article gnus-newsgroup-unreads)
       (push 'read set))
     (while marks
       (when (and (eq (gnus-article-mark-to-type (cdar marks)) 'list)