# HG changeset patch # User Lars Magne Ingebrigtsen # Date 841278644 0 # Node ID 2f732db1918cbba6938eb8058a88d0f253186842 # Parent 58742d1b996a8c44dabbc01f95f2c22e49690ccc 1996-08-28 Lars Magne Ingebrigtsen * gnus.el (gnus-group-read-group): Use range functions instead of list functions for the tick and marks ranges. diff -r 58742d1b996a -r 2f732db1918c lisp/gnus.el --- a/lisp/gnus.el Wed Aug 28 23:36:44 1996 +0000 +++ b/lisp/gnus.el Thu Aug 29 00:30:44 1996 +0000 @@ -5400,8 +5400,10 @@ (- (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)