Mercurial > emacs
comparison src/keyboard.c @ 56717:f95a8f5985be
Adapt to new wait_reading_process_input args.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Thu, 19 Aug 2004 13:59:28 +0000 |
parents | 05bc08d74392 |
children | e6e0caa7ec87 |
comparison
equal
deleted
inserted
replaced
56716:c126b8b6a314 | 56717:f95a8f5985be |
---|---|
3897 #ifdef HAVE_MOUSE | 3897 #ifdef HAVE_MOUSE |
3898 if (!NILP (do_mouse_tracking) && some_mouse_moved ()) | 3898 if (!NILP (do_mouse_tracking) && some_mouse_moved ()) |
3899 break; | 3899 break; |
3900 #endif | 3900 #endif |
3901 { | 3901 { |
3902 Lisp_Object minus_one; | 3902 wait_reading_process_input (0, 0, -1, 1, Qnil, NULL, 0); |
3903 | |
3904 XSETINT (minus_one, -1); | |
3905 wait_reading_process_input (0, 0, minus_one, 1); | |
3906 | 3903 |
3907 if (!interrupt_input && kbd_fetch_ptr == kbd_store_ptr) | 3904 if (!interrupt_input && kbd_fetch_ptr == kbd_store_ptr) |
3908 /* Pass 1 for EXPECT since we just waited to have input. */ | 3905 /* Pass 1 for EXPECT since we just waited to have input. */ |
3909 read_avail_input (1); | 3906 read_avail_input (1); |
3910 } | 3907 } |