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

; Fix docstrings in last change to subr-x.el

Browse source
This commit is contained in:
Basil L. Contovounesios 2020-12-22 09:01:47 +00:00
parent 9015329678
commit e42a63a960
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/emacs-lisp/subr-x.el
View file

@ -293,7 +293,7 @@ is returned unchanged.
If STRING is longer than LENGTH, return a substring consisting of
the first LENGTH characters of STRING. If END is non-nil, return
the last LENTGH characters instead."
the last LENGTH characters instead."
(unless (natnump length)
(signal 'wrong-type-argument (list 'natnump length)))
(cond
@ -331,8 +331,8 @@ If STRING is longer than the absolute value of LENGTH, no padding
is done.
If START is nil (or not present), the padding is done to the end
of the string, and non-nil, padding is done to the start of the
string."
of the string, and if non-nil, padding is done to the start of
the string."
(unless (natnump length)
(signal 'wrong-type-argument (list 'natnump length)))
(let ((pad-length (- length (length string))))