From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Thu, 29 Sep 2022 10:29:36 +0000 (+0200)
Subject: Tweak while-let definition
X-Git-Tag: emacs-29.0.90~1856^2~148
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0e72d4793c332f2eaba05130ea08e9809813f599;p=emacs.git

Tweak while-let definition

* lisp/subr.el (while-let): Use if-let* since we don't need/want
the backwards compat of if-let.
---

diff --git a/lisp/subr.el b/lisp/subr.el
index 2a8fc46a9f9..4f8273d56fb 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -2524,7 +2524,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))))))