diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2023-01-15 09:57:41 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2023-01-15 09:57:41 -0700 |
| commit | f16bd1ead430294ff90cb4c3f0aba608a719a2e7 (patch) | |
| tree | 67efc169fb5b9057717716383c3dc5408e40cc93 /lisp/subr.el | |
| parent | c8d548097278683c94eced742a1a1bea387ced2d (diff) | |
| download | emacs-f16bd1ead430294ff90cb4c3f0aba608a719a2e7.tar.gz | |
Revert "* lisp/subr.el (while-let): Use if-let, not if-let* (bug#60758)."
This reverts commit 083badc9c122a802080552e7771e78ee47c01e3c.
Diffstat (limited to 'lisp/subr.el')
| -rw-r--r-- | lisp/subr.el | 2 |
1 files changed, 1 insertions, 1 deletions
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)))))) |