diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2023-01-15 10:01:41 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2023-01-15 10:01:41 -0700 |
commit | 82ae9caaddb561de7709dbab818311a6e3db3f50 (patch) | |
tree | d54e02b47fd7aff0282cc39c489cd07f08621bac /lisp | |
parent | f16bd1ead430294ff90cb4c3f0aba608a719a2e7 (diff) | |
download | emacs-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.el | 4 |
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) |