From: Sean Whitton <spwhitton@spwhitton.name>
Date: Sun, 15 Jan 2023 16:57:41 +0000 (-0700)
Subject: Revert "* lisp/subr.el (while-let): Use if-let, not if-let* (bug#60758)."
X-Git-Tag: emacs-29.0.90~715
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f16bd1ead43;p=emacs.git

Revert "* lisp/subr.el (while-let): Use if-let, not if-let* (bug#60758)."

This reverts commit 083badc9c122a802080552e7771e78ee47c01e3c.
---

diff --git a/lisp/subr.el b/lisp/subr.el
index ab451b5613b..34dd847e9d5 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -2545,7 +2545,7 @@ The variable list SPEC is the same as in `if-let'."
   (let ((done (gensym "done")))
     `(catch ',done
        (while t
-         (if-let ,spec
+         (if-let* ,spec
              (progn
                ,@body)
            (throw ',done nil))))))