[gnus git] branch master updated: m0-1-122-gae5fb0b =2= Get parsing right with mixed QRESYNC and total rescans ; Cleanups related to "unexist" tracking

Lars Ingebrigtsen <[email protected]>
Newsgroups gmane.emacs.gnus.cvs
Message-ID <[email protected]>
       via  ae5fb0b06c5230fe667d0ac25e637c16f0fd8e89 (commit)
       via  d146e98dbe0444190f24ed4608f5dbc1473a1511 (commit)
      from  b4184d80dad6544a1d2dee5077fd875baf90417f (commit)


- Log -----------------------------------------------------------------
commit ae5fb0b06c5230fe667d0ac25e637c16f0fd8e89
Author: Lars Ingebrigtsen <[email protected]>
Date:   Sat Feb 11 19:51:34 2012 +0100

    Get parsing right with mixed QRESYNC and total rescans

diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index 92b1de6..a78346c 100644
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -1635,7 +1635,9 @@ textual parts.")
 			     vanished highestmodseq)
 		       articles)
 		groups)
+	  (if (eq flag-sequence 'qresync)
 	  (goto-char end)
+	    (setq end (point)))
 	  (setq articles nil))))
     groups))
 

commit d146e98dbe0444190f24ed4608f5dbc1473a1511
Author: Lars Ingebrigtsen <[email protected]>
Date:   Sat Feb 11 19:20:12 2012 +0100

    Cleanups related to "unexist" tracking
    
    * gnus.el (gnus-article-mark-lists): Add `unexist' to the list of
    marks.
    (gnus-article-special-mark-lists): Put the `unexist' in the special
    marks list instead.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 99eff7e..1abae71 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2012-02-11  Lars Ingebrigtsen  <[email protected]>
 
+	* gnus-sum.el (gnus-adjust-marked-articles): Add to
+	`gnus-newsgroup-unexist'.
+
 	* gnus.el (gnus-article-mark-lists): Add `unexist' to the list of
 	marks.
 	(gnus-article-special-mark-lists): Put the `unexist' in the special
diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 8c5f3ee..17bd7e1 100644
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -1529,6 +1529,9 @@ This list will always be a subset of gnus-newsgroup-undownloaded.")
 (defvar gnus-newsgroup-seen nil
   "Range of seen articles in the current newsgroup.")
 
+(defvar gnus-newsgroup-unexist nil
+  "Range of unexistent articles in the current newsgroup.")
+
 (defvar gnus-newsgroup-articles nil
   "List of articles in the current newsgroup.")
 
@@ -6023,7 +6026,9 @@ If SELECT-ARTICLES, only select those articles from GROUP."
 			  (and (numberp (car articles))
 			       (> min (car articles)))))
 	    (pop articles))
-	  (set var articles))))))))
+	  (set var articles))
+	 ((eq mark 'unexist)
+	  (set var (cdr marks)))))))))
 
 (defun gnus-update-missing-marks (missing)
   "Go through the list of MISSING articles and remove them from the mark lists."
diff --git a/lisp/gnus.el b/lisp/gnus.el
index 15cc321..240b590 100644
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -2620,7 +2620,7 @@ a string, be sure to use a valid format, see RFC 2616."
     (scored . score) (saved . save)
     (cached . cache) (downloadable . download)
     (unsendable . unsend) (forwarded . forward)
-    (seen . seen)))
+    (seen . seen) (unexist . unexist)))
 
 (defconst gnus-article-special-mark-lists
   '((seen range)
@@ -2639,7 +2639,7 @@ a string, be sure to use a valid format, see RFC 2616."
 ;; `score' is not a proper mark
 ;; `bookmark': don't propagated it, or fix the bug in update-mark.
 (defconst gnus-article-unpropagated-mark-lists
-  '(seen cache download unsend score bookmark)
+  '(seen cache download unsend score bookmark unexist)
   "Marks that shouldn't be propagated to back ends.
 Typical marks are those that make no sense in a standalone back end,
 such as a mark that says whether an article is stored in the cache

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog   |    3 +++
 lisp/gnus-sum.el |    7 ++++++-
 lisp/gnus.el     |    4 ++--
 lisp/nnimap.el   |    4 +++-
 4 files changed, 14 insertions(+), 4 deletions(-)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.