]> git.eshelyaron.com Git - emacs.git/commitdiff
1996-08-28 Lars Magne Ingebrigtsen <larsi@ifi.uio.no>
authorLars Magne Ingebrigtsen <larsi@gnus.org>
Thu, 29 Aug 1996 00:30:44 +0000 (00:30 +0000)
committerLars Magne Ingebrigtsen <larsi@gnus.org>
Thu, 29 Aug 1996 00:30:44 +0000 (00:30 +0000)
* gnus.el (gnus-group-read-group): Use range functions instead of
  list functions for the tick and marks ranges.

lisp/gnus.el

index ef3df2ffd1eaa8099cf10a0775b26b9adbd98161..1804f0b0cc1ae4eeb02265e16206f41de63ae3f8 100644 (file)
@@ -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)