; Fix recent shortdoc.el and fns.c additions

* lisp/emacs-lisp/shortdoc.el (list): Fix typos.
* src/fns.c (Flength_equal): Fix docstring.
This commit is contained in:
Basil L. Contovounesios 2020-12-27 13:14:30 +00:00
parent 8bc727d0b4
commit df882c9701
2 changed files with 4 additions and 4 deletions

View file

@ -619,11 +619,11 @@ There can be any number of :example/:result elements."
(length
:eval (length '(a b c)))
(length<
:eval (lenth< '(a b c) 1))
:eval (length< '(a b c) 1))
(length>
:eval (lenth> '(a b c) 1))
:eval (length> '(a b c) 1))
(length=
:eval (lenth> '(a b c) 3))
:eval (length> '(a b c) 3))
(safe-length
:eval (safe-length '(a b c))))

View file

@ -202,7 +202,7 @@ counted. */)
}
DEFUN ("length=", Flength_equal, Slength_equal, 2, 2, 0,
doc: /* Return non-nil if SEQUENCE is equal to LENGTH.
doc: /* Return non-nil if SEQUENCE has length equal to LENGTH.
See `length' for allowed values of SEQUENCE and how elements are
counted. */)
(Lisp_Object sequence, Lisp_Object length)