[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
emacs-29 da8b85b577d: Add two docstrings in cl-lib.el
From: |
Eli Zaretskii |
Subject: |
emacs-29 da8b85b577d: Add two docstrings in cl-lib.el |
Date: |
Mon, 30 Oct 2023 07:42:33 -0400 (EDT) |
branch: emacs-29
commit da8b85b577d79dd45632d9c40a1336b58b955812
Author: Jeremy Bryant <jb@jeremybryant.net>
Commit: Eli Zaretskii <eliz@gnu.org>
Add two docstrings in cl-lib.el
* lisp/emacs-lisp/cl-lib.el (cl--set-buffer-substring)
(cl--defalias): Add docstrings. (Bug#66828)
---
lisp/emacs-lisp/cl-lib.el | 4 ++++
1 file changed, 4 insertions(+)
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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- emacs-29 da8b85b577d: Add two docstrings in cl-lib.el,
Eli Zaretskii <=