]> git.eshelyaron.com Git - emacs.git/commitdiff
Checkdoc fixes in `emacs-lisp/*.el`
authorStefan Kangas <stefankangas@gmail.com>
Mon, 8 Jul 2024 12:30:37 +0000 (14:30 +0200)
committerEshel Yaron <me@eshelyaron.com>
Tue, 9 Jul 2024 17:50:09 +0000 (19:50 +0200)
* lisp/emacs-lisp/bytecomp.el (byte-compile-free-vars-warn)
(byte-compile-out):
* lisp/emacs-lisp/eldoc.el (eldoc-documentation-functions):
* lisp/emacs-lisp/find-func.el (find-ert-deftest-regexp):
* lisp/emacs-lisp/macroexp.el (byte-compile-form-stack):
Checkdoc fixes.

(cherry picked from commit ef7364b070e416810de0861c78dbdedf183ee067)

lisp/emacs-lisp/bytecomp.el
lisp/emacs-lisp/eldoc.el
lisp/emacs-lisp/find-func.el
lisp/emacs-lisp/macroexp.el

index 94f5264cb6a00b683f9999a51f758bc3ff2f0dd5..569bd7f03f7174654abf2a3f33823e3537c8ce93 100644 (file)
@@ -3840,7 +3840,7 @@ This assumes the function has the `important-return-value' property."
 (defun byte-compile-free-vars-warn (arg var &optional assignment)
   "Warn if symbol VAR refers to a free variable.
 VAR must not be lexically bound.
-ARG is a position argument, used by byte-compile-warn-x.
+ARG is a position argument, used by `byte-compile-warn-x'.
 If optional argument ASSIGNMENT is non-nil, this is treated as an
 assignment (i.e. `setq')."
   (unless (or (not (byte-compile-warning-enabled-p 'free-vars var))
@@ -5496,7 +5496,7 @@ OP and OPERAND are as passed to `byte-compile-out'."
 (defun byte-compile-out (op &optional operand)
   "Push the operation onto `byte-compile-output'.
 OP is an opcode, a symbol.  OPERAND is either nil or a number or
-a one-element list of a lisp form."
+a one-element list of a Lisp form."
   (when (and (consp operand) (null (cdr operand)))
     (setq operand (byte-run-strip-symbol-positions operand)))
   (push (cons op operand) byte-compile-output)
index 1a7dad4e02661b878e269fbc85204fe93e240e02..b3fcd43328b3e498e7b69b900f97a324c813a2bc 100644 (file)
@@ -462,7 +462,7 @@ documentation-displaying frontends.  For example, KEY can be:
 
 The additional KEY `:origin' is always added by ElDoc, its VALUE
 being the member of `eldoc-documentation-functions' where
-DOCSTRING originated. `eldoc-display-functions' may use this
+DOCSTRING originated.  `eldoc-display-functions' may use this
 information to organize display of multiple docstrings.
 
 Finally, major modes should modify this hook locally, for
index 3e46a6522b4424dda0e3c63f435e5ffc3aafa7ee..4753f8362e6e3da6f3e5b858fa996686560f5800 100644 (file)
@@ -125,7 +125,7 @@ should insert the feature name."
 
 (defcustom find-ert-deftest-regexp
   "(ert-deftest +'%s"
-  "The regexp used to search for an ert-deftest definition.
+  "The regexp used to search for an `ert-deftest' definition.
 Note it must contain a `%s' at the place where `format'
 should insert the feature name."
   :type 'regexp
index bb4797cac8b18b584ebb52e373255b2070f5bfc8..4524eccc7ef8b5a0e7282ba25ac9cb8d0ca5ec98 100644 (file)
@@ -37,7 +37,7 @@ most deeply nested form.
 Normally a form is manually pushed onto the list at the beginning
 of `byte-compile-form', etc., and manually popped off at its end.
 This is to preserve the data in it in the event of a
-condition-case handling a signaled error.")
+`condition-case' handling a signaled error.")
 
 (defmacro macroexp--with-extended-form-stack (expr &rest body)
   "Evaluate BODY with EXPR pushed onto `byte-compile-form-stack'."