Fix off-by-one error when concatenating ranges when doing a partial update.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4526d99..d2c24a9 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -6,6 +6,8 @@
        (nnimap-wait-for-connection): New function.
        (nnimap-open-connection): If we have PREAUTH, don't query for login
        credentials.
+       (nnimap-update-info): Fix off-by-one error when concatenating ranges
+       when doing a partial update.
 
 2010-09-18  Julien Danjou  <julien@danjou.info>
 

diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index 4552595..db60504 100644 (file)
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -631,9 +631,11 @@ not done by default on servers that doesn't support that command.")
          (when (> start-article 1)
            (setq read
                  (gnus-range-nconcat
-                  (gnus-sorted-range-intersection
-                   (cons 1 start-article)
-                   (gnus-info-read info))
+                  (if (> start-article 1)
+                      (gnus-sorted-range-intersection
+                       (cons 1 (1- start-article))
+                       (gnus-info-read info))
+                    (gnus-info-read info))
                   read)))
          (gnus-info-set-read info read)
          ;; Update the marks.