diff options
| author | Basil L. Contovounesios <contovob@tcd.ie> | 2020-12-22 09:01:47 +0000 |
|---|---|---|
| committer | Basil L. Contovounesios <contovob@tcd.ie> | 2020-12-22 09:01:47 +0000 |
| commit | e42a63a96004e2a5865dd3bc48f78f16a879e918 (patch) | |
| tree | 11c2c25da35ae23823e65f5e2833931bf9ca1e1f /lisp/emacs-lisp/subr-x.el | |
| parent | 901532967873ab82d948024105b5736b622f518b (diff) | |
| download | emacs-e42a63a96004e2a5865dd3bc48f78f16a879e918.tar.gz emacs-e42a63a96004e2a5865dd3bc48f78f16a879e918.tar.bz2 emacs-e42a63a96004e2a5865dd3bc48f78f16a879e918.zip | |
; Fix docstrings in last change to subr-x.el
Diffstat (limited to 'lisp/emacs-lisp/subr-x.el')
| -rw-r--r-- | lisp/emacs-lisp/subr-x.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/subr-x.el b/lisp/emacs-lisp/subr-x.el index dc046c3d76a..09c4649817a 100644 --- a/lisp/emacs-lisp/subr-x.el +++ b/lisp/emacs-lisp/subr-x.el @@ -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)))) |