From: Lars Magne Ingebrigtsen <larsi@gnus.org>
Date: Thu, 29 Aug 1996 00:30:44 +0000 (+0000)
Subject: 1996-08-28  Lars Magne Ingebrigtsen  <larsi@ifi.uio.no>
X-Git-Tag: emacs-20.1~3985
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=05066a9270b9cb7e20ae7ad6fe42944c32fd3899;p=emacs.git

1996-08-28  Lars Magne Ingebrigtsen  <larsi@ifi.uio.no>

	* gnus.el (gnus-group-read-group): Use range functions instead of
 	list functions for the tick and marks ranges.
---

diff --git a/lisp/gnus.el b/lisp/gnus.el
index ef3df2ffd1e..1804f0b0cc1 100644
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -5400,8 +5400,10 @@ group."
 		 (- (1+ (cdr active)) (car active)))))
     (gnus-summary-read-group
      group (or all (and (numberp number)
-			(zerop (+ number (length (cdr (assq 'tick marked)))
-				  (length (cdr (assq 'dormant marked)))))))
+			(zerop (+ number (gnus-range-length 
+					  (cdr (assq 'tick marked)))
+				  (gnus-range-length
+				   (cdr (assq 'dormant marked)))))))
      no-article)))
 
 (defun gnus-group-select-group (&optional all)