2012-04-10 Lars Magne Ingebrigtsen <larsi@gnus.org>
+ * 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
(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)))