(with-local-quit): Doc fix.

This commit is contained in:
Richard M. Stallman 2004-07-31 03:42:27 +00:00
parent 451eaa2138
commit 53a7160c92
2 changed files with 8 additions and 1 deletions

View file

@ -1,3 +1,7 @@
2004-07-30 Richard M. Stallman <rms@gnu.org>
* subr.el (with-local-quit): Doc fix.
2004-07-30 Luc Teirlinck <teirllm@auburn.edu>
* international/utf-8.el (utf-translate-cjk-mode): Doc fix.

View file

@ -1894,7 +1894,10 @@ See also `with-temp-file' and `with-output-to-string'."
(kill-buffer nil)))))
(defmacro with-local-quit (&rest body)
"Execute BODY with `inhibit-quit' temporarily bound to nil."
"Execute BODY, allowing quits to terminate BODY but not escape further.
When a quit terminates BODY, `with-local-quit' requests another quit when
it finishes. That quit will be processed in turn, the next time quitting
is again allowed."
(declare (debug t) (indent 0))
`(condition-case nil
(let ((inhibit-quit nil))