mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 06:20:55 -08:00
Code Issues Projects Releases Wiki Activity

; Adjust overly long docstrings to fit 80 characters

Browse source
This commit is contained in:
Stefan Kangas 2021-09-24 14:46:56 +02:00
parent f4ea15907a
commit c78e16962e
45 changed files with 138 additions and 87 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/emacs-lisp/seq.el
View file

@ -529,7 +529,7 @@ SEQUENCE must be a sequence of numbers or markers."
(apply #'max (seq-into sequence 'list)))
(defun seq--count-successive (pred sequence)
"Return the number of successive elements for which (PRED element) is non-nil in SEQUENCE."
"Count successive elements for which (PRED element) is non-nil in SEQUENCE."
(let ((n 0)
(len (seq-length sequence)))
(while (and (< n len)
@ -538,7 +538,7 @@ SEQUENCE must be a sequence of numbers or markers."
n))
(defun seq--make-pcase-bindings (args)
"Return a list of bindings of the variables in ARGS to the elements of a sequence."
"Return list of bindings of the variables in ARGS to the elements of a sequence."
(let ((bindings '())
(index 0)
(rest-marker nil))