summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2023-01-15 10:01:41 -0700
committerSean Whitton <spwhitton@spwhitton.name>2023-01-15 10:01:41 -0700
commit82ae9caaddb561de7709dbab818311a6e3db3f50 (patch)
treed54e02b47fd7aff0282cc39c489cd07f08621bac /lisp
parentf16bd1ead430294ff90cb4c3f0aba608a719a2e7 (diff)
downloademacs-82ae9caaddb561de7709dbab818311a6e3db3f50.tar.gz
emacs-82ae9caaddb561de7709dbab818311a6e3db3f50.tar.bz2
emacs-82ae9caaddb561de7709dbab818311a6e3db3f50.zip
* lisp/subr.el (while-let): Fix docs if-let->if-let* (bug#60758).
Diffstat (limited to 'lisp')
-rw-r--r--lisp/subr.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/subr.el b/lisp/subr.el
index 34dd847e9d5..0f754fcd31f 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -2540,11 +2540,13 @@ The variable list SPEC is the same as in `if-let'."
Evaluate each binding in turn, stopping if a binding value is nil.
If all bindings are non-nil, eval BODY and repeat.
-The variable list SPEC is the same as in `if-let'."
+The variable list SPEC is the same as in `if-let*'."
(declare (indent 1) (debug if-let))
(let ((done (gensym "done")))
`(catch ',done
(while t
+ ;; This is `if-let*', not `if-let', deliberately, despite the
+ ;; name of this macro. See bug#60758.
(if-let* ,spec
(progn
,@body)