diff options
Diffstat (limited to 'lisp')
| -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 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)))))) |