Mercurial > emacs
changeset 80305:7d73fa3b38be
(while-no-input): Don't splice BODY directly into the `or' form.
| author | Johan Bockgård <bojohan@gnu.org> |
|---|---|
| date | Sat, 08 Mar 2008 16:00:20 +0000 |
| parents | 842d7b2745f7 |
| children | 825be512e2e6 |
| files | lisp/ChangeLog lisp/subr.el |
| diffstat | 2 files changed, 6 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sat Mar 08 15:55:51 2008 +0000 +++ b/lisp/ChangeLog Sat Mar 08 16:00:20 2008 +0000 @@ -1,3 +1,8 @@ +2008-03-08 Johan Bockg$(Q)[(Brd <bojohan@gnu.org> + + * subr.el (while-no-input): Don't splice BODY directly into the + `or' form. + 2008-03-06 Kim F. Storm <storm@cua.dk> * help.el (view-emacs-todo): Rename from view-todo. Change users.
--- a/lisp/subr.el Sat Mar 08 15:55:51 2008 +0000 +++ b/lisp/subr.el Sat Mar 08 16:00:20 2008 +0000 @@ -2478,7 +2478,7 @@ (catch ',catch-sym (let ((throw-on-input ',catch-sym)) (or (input-pending-p) - ,@body)))))) + (progn ,@body))))))) (defmacro combine-after-change-calls (&rest body) "Execute BODY, but don't call the after-change functions till the end.