diff src/fns.c @ 2654:ba685dcc3750

Arrange for Fy_or_n_p to put off switch-frame events. * lread.c (read_filtered_char): New function, which contains the code which used to be in Fread_char, Fread_event, and Fread_char_exclusive; there was a lot of common code. (Fread_char, Fread_event, Fread_char_exclusive): Rewrite in terms of read_filtered_char. * lisp.h (read_filtered_char): Declare this extern here. * fns.c (Fy_or_n_p): Call read_filtered_char, arranging to delay switch-frame events.
author Jim Blandy <jimb@redhat.com>
date Tue, 04 May 1993 02:35:01 +0000
parents c8cd694d70eb
children 683f4472f1c8
line wrap: on
line diff
--- a/src/fns.c	Tue May 04 02:34:26 1993 +0000
+++ b/src/fns.c	Tue May 04 02:35:01 1993 +0000
@@ -1111,7 +1111,7 @@
       cursor_in_echo_area = 1;
       message ("%s(y or n) ", XSTRING (xprompt)->data);
 
-      obj = read_char (0, 0, 0, Qnil, 0);
+      obj = read_filtered_event (1, 0, 0);
       cursor_in_echo_area = 0;
       /* If we need to quit, quit with cursor_in_echo_area = 0.  */
       QUIT;