diff options
| author | Jeremy Bryant <jb@jeremybryant.net> | 2023-10-29 21:56:54 +0000 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2023-10-30 13:41:19 +0200 |
| commit | da8b85b577d79dd45632d9c40a1336b58b955812 (patch) | |
| tree | e572f9ff73986bee86d7e118a231336a39297117 /lisp/emacs-lisp | |
| parent | 41939127457f0564217caef2d8740f8e0e816b9c (diff) | |
| download | emacs-da8b85b577d79dd45632d9c40a1336b58b955812.tar.gz emacs-da8b85b577d79dd45632d9c40a1336b58b955812.tar.bz2 emacs-da8b85b577d79dd45632d9c40a1336b58b955812.zip | |
Add two docstrings in cl-lib.el
* lisp/emacs-lisp/cl-lib.el (cl--set-buffer-substring)
(cl--defalias): Add docstrings. (Bug#66828)
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/cl-lib.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/cl-lib.el b/lisp/emacs-lisp/cl-lib.el index 152a1fe9434..96197d43c3d 100644 --- a/lisp/emacs-lisp/cl-lib.el +++ b/lisp/emacs-lisp/cl-lib.el @@ -157,6 +157,7 @@ to an element already in the list stored in PLACE. `(cl-callf2 cl-adjoin ,x ,place ,@keys))) (defun cl--set-buffer-substring (start end val) + "Delete region from START to END and insert VAL." (save-excursion (delete-region start end) (goto-char start) (insert val) @@ -183,6 +184,9 @@ to an element already in the list stored in PLACE. ;; the target form to return the values as a list. (defun cl--defalias (cl-f el-f &optional doc) + "Define function CL-F as definition EL-F. + +For example, (cl--defalias 'cl-first 'car)." (defalias cl-f el-f doc) (put cl-f 'byte-optimizer 'byte-compile-inline-expand)) |