[gnus git] branch master updated: m0-3-134-g7be59e2 =1= nnimap unexist tracking fix

       via  7be59e2d779ab4dd96952024265e001018c00332 (commit)
      from  3a1e2f1947836f6062d169f3c8eb3ed5912200ca (commit)


- Log -----------------------------------------------------------------
commit 7be59e2d779ab4dd96952024265e001018c00332
Author: Lars Magne Ingebrigtsen <[email protected]>
Date:   Wed Apr 11 00:01:36 2012 +0200

    nnimap unexist tracking fix
    
    (nnimap-update-info): None of the articles below the active low-water
    mark exist

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d742d0c..274667f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2012-04-10  Lars Magne Ingebrigtsen  <[email protected]>
 
+	* nnimap.el (nnimap-update-info): None of the articles below the active
+	low-water mark exist.
+
 	* dgnushack.el: Get rid of XEmacs compilation warning.
 
 	* gnus-msg.el (gnus-summary-cancel-article): See what From header we
diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index 83100a5..11ebe71 100644
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -1456,15 +1456,20 @@ textual parts.")
 		      (push (cons (car type) new-marks) marks)))))
 	      ;; Keep track of non-existing articles.
 	      (let* ((old-unexists (assq 'unexist marks))
+		     (active (gnus-active group))
 		     (unexists
 		      (if completep
 			  (gnus-range-difference
-			   (gnus-active group)
+			   active
 			   (gnus-compress-sequence existing))
 			(gnus-add-to-range
 			 (cdr old-unexists)
 			 (gnus-list-range-difference
 			  existing (gnus-active group))))))
+		(when (> (car active) 1)
+		  (setq unexists (gnus-range-add
+				  (cons 1 (1- (car active)))
+				  unexists)))
 		(if old-unexists
 		    (setcdr old-unexists unexists)
 		  (push (cons 'unexist unexists) marks)))

-----------------------------------------------------------------------
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/nnimap.el |    7 ++++++-
 2 files changed, 9 insertions(+), 1 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