From 083badc9c122a802080552e7771e78ee47c01e3c Mon Sep 17 00:00:00 2001
From: Sean Whitton <spwhitton@spwhitton.name>
Date: Thu, 12 Jan 2023 17:09:01 -0700
Subject: [PATCH] * lisp/subr.el (while-let): Use if-let, not if-let*
 (bug#60758).

---
 lisp/subr.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/subr.el b/lisp/subr.el
index 62f72734e14..485ca9e4f1b 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))))))
-- 
2.39.2