diff options
-rw-r--r-- | win/tkWinX.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/win/tkWinX.c b/win/tkWinX.c index f4908e0..e8715b3 100644 --- a/win/tkWinX.c +++ b/win/tkWinX.c @@ -1225,6 +1225,7 @@ GenerateXEvent( event.xany.send_event = -3; event.xkey.nbytes = Tcl_UniCharToUtf(ch1, buffer); if ((ch1 <= 0xffff) || (event.xkey.nbytes == XMaxTransChars)) { + event.xkey.keycode = ch1; for (i=0; i<event.xkey.nbytes && i<XMaxTransChars; ++i) { event.xkey.trans_chars[i] = buffer[i]; } |