summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/range.el
diff options
context:
space:
mode:
authorMichael Heerdegen <michael_heerdegen@web.de>2023-01-11 16:47:01 +0100
committerMichael Heerdegen <michael_heerdegen@web.de>2023-01-28 17:30:42 +0100
commit835d2b6acbe42b0bdef8f6e5f00fb0adbd1e3bcb (patch)
treeb390dc42df34ef6b23c5b2beb54ed2256c594505 /lisp/emacs-lisp/range.el
parent4de1171d143f0fa75c777f1a9050ae537d7732e5 (diff)
downloademacs-835d2b6acbe42b0bdef8f6e5f00fb0adbd1e3bcb.tar.gz
emacs-835d2b6acbe42b0bdef8f6e5f00fb0adbd1e3bcb.tar.bz2
emacs-835d2b6acbe42b0bdef8f6e5f00fb0adbd1e3bcb.zip
; * lisp/emacs-lisp/range.el: Fix some typos
In some places, range elements are still called "article" (as in the original Gnus code). Replace these occurrences with the word "number" as used in the rest of the file.
Diffstat (limited to 'lisp/emacs-lisp/range.el')
-rw-r--r--lisp/emacs-lisp/range.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/range.el b/lisp/emacs-lisp/range.el
index 1165fcbbd7d..f441c240a27 100644
--- a/lisp/emacs-lisp/range.el
+++ b/lisp/emacs-lisp/range.el
@@ -194,7 +194,7 @@ these ranges."
(nreverse result)))))
(defun range-add-list (ranges list)
- "Return a list of ranges that has all articles from both RANGES and LIST.
+ "Return a list of ranges that has all numbers from both RANGES and LIST.
Note: LIST has to be sorted over `<'."
(if (not ranges)
(range-compress-list list)
@@ -249,9 +249,9 @@ Note: LIST has to be sorted over `<'."
out)))
(defun range-remove (range1 range2)
- "Return a range that has all articles from RANGE2 removed from RANGE1.
+ "Return a range that has all numbers from RANGE2 removed from RANGE1.
The returned range is always a list. RANGE2 can also be a unsorted
-list of articles. RANGE1 is modified by side effects, RANGE2 is not
+list of numbers. RANGE1 is modified by side effects, RANGE2 is not
modified."
(if (or (null range1) (null range2))
range1
@@ -345,7 +345,7 @@ modified."
(defun range-list-intersection (list ranges)
"Return a list of numbers in LIST that are members of RANGES.
-oLIST is a sorted list."
+LIST is a sorted list."
(setq ranges (range-normalize ranges))
(let (number result)
(while (setq number (pop list))