changeset 2434:39c696510c64

(read_char): Clear Vquit_flag when we return C-g for it.
author Richard M. Stallman <rms@gnu.org>
date Wed, 31 Mar 1993 07:04:46 +0000
parents 06fcbff9d381
children b72453ad92ae
files src/keyboard.c
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/keyboard.c	Tue Mar 30 23:07:47 1993 +0000
+++ b/src/keyboard.c	Wed Mar 31 07:04:46 1993 +0000
@@ -1317,6 +1317,10 @@
       XSET (internal_last_event_frame, Lisp_Frame, selected_frame);
       Vlast_event_frame = internal_last_event_frame;
 #endif
+      /* If we report the quit char as an event,
+	 don't do so more than once.  */
+      if (!NILP (Vinhibit_quit))
+	Vquit_flag = Qnil;
 
       goto non_reread;
     }