(gnus-compress-sequence): Doc fix. Suggested by

Jim Blandy <jimb@redhat.com> (tiny change).

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cb13757..b65c68d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2004-01-13  Simon Josefsson  <jas@extundo.com>
+
+       * gnus-range.el (gnus-compress-sequence): Doc fix.  Suggested by
+       Jim Blandy <jimb@redhat.com> (tiny change).
+
 2004-01-12  Jesper Harder  <harder@ifa.au.dk>
 
        * gnus-srvr.el (gnus-browse-foreign-server): Reduce consing.

diff --git a/lisp/gnus-range.el b/lisp/gnus-range.el
index 2e0a988..fc151a2 100644 (file)
--- a/lisp/gnus-range.el
+++ b/lisp/gnus-range.el
@@ -1,6 +1,6 @@
 ;;; gnus-range.el --- range and sequence functions for Gnus
 
-;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002
+;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2004
 ;;        Free Software Foundation, Inc.
 
 ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
@@ -255,7 +255,7 @@ LIST1 and LIST2 have to be sorted over <."
     (cdr top)))
 
 (defun gnus-compress-sequence (numbers &optional always-list)
-  "Convert list of numbers to a list of ranges or a single range.
+  "Convert sorted list of numbers to a list of ranges or a single range.
 If ALWAYS-LIST is non-nil, this function will always release a list of
 ranges."
   (let* ((first (car numbers))