gnus-sum.el (gnus-update-marks): Revert intersection change, which made marks not...

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 51169f7b9dfd5d1fe9268482da4f5890d882937e..2496453dd89ba12aad04403fab5f30f3100773ea 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
+2011-03-30  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * gnus-sum.el (gnus-update-marks): Revert intersection change, which
+       made marks not propagate, again.
+
 2011-03-30  Chong Yidong  <cyd@stupidchicken.com>
 
        * proto-stream.el (open-protocol-stream): Bring back `network' type.

diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index 91dc6fb9595baba75b99b2c4a2c80861e1634aea..10aa4e12dcf68c22ed27b4b1ab7f9aa4383b5ade 100644 (file)
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -6072,14 +6072,10 @@ If SELECT-ARTICLES, only select those articles from GROUP."
                 ;; didn't actually get any headers for.
                 (existing (gnus-compress-sequence gnus-newsgroup-articles))
                 (del
-                 (gnus-sorted-range-intersection
-                  existing
-                  (gnus-remove-from-range (gnus-copy-sequence old) list)))
+                 (gnus-remove-from-range (gnus-copy-sequence old) list))
                 (add
-                 (gnus-sorted-range-intersection
-                  existing
-                  (gnus-remove-from-range
-                   (gnus-copy-sequence list) old))))
+                 (gnus-remove-from-range
+                  (gnus-copy-sequence list) old)))
            (when add
              (push (list add 'add (list (cdr type))) delta-marks))
            (when del