Fix reporting of last-event-device for synthetic events

* src/keyboard.c (read_char): Clear `last-event-device' earlier.

diff --git a/src/keyboard.c b/src/keyboard.c
index 8142ffec2df7853c9f8be6811c0d5cdaac429ad1..01274b4d4a875ad454dca56b288818b969176370 100644 (file)
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -2465,6 +2465,7 @@ read_char (int commandflag, Lisp_Object map,
   else
     reread = false;
 
+  Vlast_event_device = Qnil;
 
   if (CONSP (Vunread_command_events))
     {
@@ -2525,8 +2526,6 @@ read_char (int commandflag, Lisp_Object map,
       goto reread_for_input_method;
     }
 
-  Vlast_event_device = Qnil;
-
   if (!NILP (Vexecuting_kbd_macro))
     {
       /* We set this to Qmacro; since that's not a frame, nobody will