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 }