(last_timer_event): New variable.

(timer_check): Set that variable.

1 files changed, 5 insertions, 0 deletions

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);