From: Sean Whitton <spwhitton@spwhitton.name>
Date: Sun, 15 Jan 2023 17:01:41 +0000 (-0700)
Subject: * lisp/subr.el (while-let): Fix docs if-let->if-let* (bug#60758).
X-Git-Tag: emacs-29.0.90~714
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=82ae9caaddb;p=emacs.git

* lisp/subr.el (while-let): Fix docs if-let->if-let* (bug#60758).
---

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)