* gnus-range.el (gnus-inverse-list-range-intersection): Off-by-one

[gnus] / lisp / gnus-range.el

diff --git a/lisp/gnus-range.el b/lisp/gnus-range.el
index a51b7ee..8e3c097 100644 (file)
--- a/lisp/gnus-range.el
+++ b/lisp/gnus-range.el
@@ -355,7 +355,7 @@ LIST is a sorted list."
       (when (or (not ranges)
                (if (numberp (car ranges))
                    (not (= (car ranges) number))
-                 (not (< number (cdar ranges)))))
+                 (not (<= number (cdar ranges)))))
        (push number result)))
     (nreverse result)))