summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--win/tkWinX.c1
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];
}