aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/subr.el3
-rw-r--r--src/keyboard.c9
2 files changed, 5 insertions, 7 deletions
diff --git a/lisp/subr.el b/lisp/subr.el
index 73f7f3e0d12..5da5bf8388a 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -3337,7 +3337,8 @@ is allowed once again. (Immediately, if `inhibit-quit' is nil.)"
3337 3337
3338;; Don't throw `throw-on-input' on those events by default. 3338;; Don't throw `throw-on-input' on those events by default.
3339(setq while-no-input-ignore-events 3339(setq while-no-input-ignore-events
3340 '(focus-in focus-out help iconify deiconify selection-request)) 3340 '(focus-in focus-out help-echo iconify-frame
3341 make-frame-visible selection-request))
3341 3342
3342(defmacro while-no-input (&rest body) 3343(defmacro while-no-input (&rest body)
3343 "Execute BODY only as long as there's no pending input. 3344 "Execute BODY only as long as there's no pending input.
diff --git a/src/keyboard.c b/src/keyboard.c
index 6d509dd42be..dadc3ac2d7b 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -3573,9 +3573,9 @@ kbd_buffer_store_buffered_event (union buffered_input_event *event,
3573 { 3573 {
3574 case FOCUS_IN_EVENT: ignore_event = Qfocus_in; break; 3574 case FOCUS_IN_EVENT: ignore_event = Qfocus_in; break;
3575 case FOCUS_OUT_EVENT: ignore_event = Qfocus_out; break; 3575 case FOCUS_OUT_EVENT: ignore_event = Qfocus_out; break;
3576 case HELP_EVENT: ignore_event = Qhelp; break; 3576 case HELP_EVENT: ignore_event = Qhelp_echo; break;
3577 case ICONIFY_EVENT: ignore_event = Qiconify; break; 3577 case ICONIFY_EVENT: ignore_event = Qiconify_frame; break;
3578 case DEICONIFY_EVENT: ignore_event = Qdeiconify; break; 3578 case DEICONIFY_EVENT: ignore_event = Qmake_frame_visible; break;
3579 case SELECTION_REQUEST_EVENT: ignore_event = Qselection_request; break; 3579 case SELECTION_REQUEST_EVENT: ignore_event = Qselection_request; break;
3580 } 3580 }
3581 3581
@@ -11172,9 +11172,6 @@ syms_of_keyboard (void)
11172 DEFSYM (Qiconify_frame, "iconify-frame"); 11172 DEFSYM (Qiconify_frame, "iconify-frame");
11173 DEFSYM (Qmake_frame_visible, "make-frame-visible"); 11173 DEFSYM (Qmake_frame_visible, "make-frame-visible");
11174 DEFSYM (Qselect_window, "select-window"); 11174 DEFSYM (Qselect_window, "select-window");
11175 DEFSYM (Qhelp, "help");
11176 DEFSYM (Qiconify, "iconify");
11177 DEFSYM (Qdeiconify, "deiconify");
11178 DEFSYM (Qselection_request, "selection-request"); 11175 DEFSYM (Qselection_request, "selection-request");
11179 { 11176 {
11180 int i; 11177 int i;