[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/subr.el
From: |
Richard M. Stallman |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/subr.el |
Date: |
Thu, 25 May 2006 00:18:55 +0000 |
Index: emacs/lisp/subr.el
diff -u emacs/lisp/subr.el:1.512 emacs/lisp/subr.el:1.513
--- emacs/lisp/subr.el:1.512 Wed May 24 22:27:19 2006
+++ emacs/lisp/subr.el Thu May 25 00:18:55 2006
@@ -1617,7 +1617,7 @@
This function echoes `.' for each character that the user types.
The user ends with RET, LFD, or ESC. DEL or C-h rubs out. C-u kills line.
C-g quits; if `inhibit-quit' was non-nil around this function,
-then it returns nil if the user types C-g.
+then it returns nil if the user types C-g, but quit-flag remains set.
Once the caller uses the password, it can erase the password
by doing (clear-string STRING)."
@@ -2321,7 +2321,13 @@
`(condition-case nil
(let ((inhibit-quit nil))
,@body)
- (quit (setq quit-flag t) nil)))
+ (quit (setq quit-flag t)
+ ;; This call is to give a chance to handle quit-flag
+ ;; in case inhibit-quit is nil.
+ ;; Without this, it will not be handled until the next function
+ ;; call, and that might allow it to exit thru a condition-case
+ ;; that intends to handle the quit signal next time.
+ (eval '(ignore nil)))))
(defmacro while-no-input (&rest body)
"Execute BODY only as long as there's no pending input.
- [Emacs-diffs] Changes to emacs/lisp/subr.el, Kim F. Storm, 2006/05/05
- [Emacs-diffs] Changes to emacs/lisp/subr.el, Nick Roberts, 2006/05/09
- [Emacs-diffs] Changes to emacs/lisp/subr.el, Miles Bader, 2006/05/09
- [Emacs-diffs] Changes to emacs/lisp/subr.el, Kim F. Storm, 2006/05/16
- [Emacs-diffs] Changes to emacs/lisp/subr.el, Alan Mackenzie, 2006/05/24
- [Emacs-diffs] Changes to emacs/lisp/subr.el, Richard M. Stallman, 2006/05/24
- [Emacs-diffs] Changes to emacs/lisp/subr.el,
Richard M. Stallman <=
- [Emacs-diffs] Changes to emacs/lisp/subr.el, Richard M. Stallman, 2006/05/24
- [Emacs-diffs] Changes to emacs/lisp/subr.el, Richard M. Stallman, 2006/05/28
- [Emacs-diffs] Changes to emacs/lisp/subr.el, Richard M. Stallman, 2006/05/29