procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

; 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

2
lisp/emacs-lisp/eieio-core.el
View file

@ -953,7 +953,7 @@ need be... May remove that later...)"
class))
(defun eieio--c3-merge-lists (reversed-partial-result remaining-inputs)
"Merge REVERSED-PARTIAL-RESULT REMAINING-INPUTS in a consistent order, if possible.
"Try to merge REVERSED-PARTIAL-RESULT REMAINING-INPUTS in a consistent order.
If a consistent order does not exist, signal an error."
(setq remaining-inputs (delq nil remaining-inputs))
(if (null remaining-inputs)

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))