From: Richard M. Stallman Date: Thu, 28 Mar 1996 18:35:56 +0000 (+0000) Subject: (last_timer_event): New variable. X-Git-Tag: emacs-19.34~956 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e044e87cc7edd41f68ec2f8c7a7964952e9b39cf;p=emacs.git (last_timer_event): New variable. (timer_check): Set that variable. --- diff --git a/src/keyboard.c b/src/keyboard.c index 9a30170d18d..15f8eed53cb 100644 --- a/src/keyboard.c +++ b/src/keyboard.c @@ -2928,6 +2928,9 @@ timer_stop_idle () EMACS_SET_SECS_USECS (timer_idleness_start_time, -1, -1); } +/* This is only for debugging. */ +struct input_event last_timer_event; + /* Check whether a timer has fired. To prevent larger problems we simply disregard elements that are not proper timers. Do not make a circular timer list for the time being. @@ -3122,6 +3125,8 @@ timer_check (do_it_now) = Fcons (Fselected_frame (), chosen_timer); kbd_buffer_store_event (&event); + last_timer_event = event; + /* Tell caller to handle this event right away. */ events_generated = 1; EMACS_SET_SECS (nexttime, 0);