aboutsummaryrefslogtreecommitdiffstats
path: root/src/lread.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/lread.c')
-rw-r--r--src/lread.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/lread.c b/src/lread.c
index c62c62a5e5a..e7af86aa664 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -614,17 +614,17 @@ read_filtered_event (bool no_switch_frame, bool ascii_required,
614 end_time = add_emacs_time (current_emacs_time (), wait_time); 614 end_time = add_emacs_time (current_emacs_time (), wait_time);
615 } 615 }
616 616
617/* Read until we get an acceptable event. */ 617 /* Read until we get an acceptable event. */
618 retry: 618 retry:
619 do 619 do
620 val = read_char (0, 0, 0, (input_method ? Qnil : Qt), 0, 620 val = read_char (0, Qnil, (input_method ? Qnil : Qt), 0,
621 NUMBERP (seconds) ? &end_time : NULL); 621 NUMBERP (seconds) ? &end_time : NULL);
622 while (INTEGERP (val) && XINT (val) == -2); /* wrong_kboard_jmpbuf */ 622 while (INTEGERP (val) && XINT (val) == -2); /* wrong_kboard_jmpbuf */
623 623
624 if (BUFFERP (val)) 624 if (BUFFERP (val))
625 goto retry; 625 goto retry;
626 626
627 /* switch-frame events are put off until after the next ASCII 627 /* `switch-frame' events are put off until after the next ASCII
628 character. This is better than signaling an error just because 628 character. This is better than signaling an error just because
629 the last characters were typed to a separate minibuffer frame, 629 the last characters were typed to a separate minibuffer frame,
630 for example. Eventually, some code which can deal with 630 for example. Eventually, some code which can deal with