diff options
author | dgp <dgp@users.sourceforge.net> | 2019-10-28 16:45:50 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2019-10-28 16:45:50 (GMT) |
commit | 2c7448ee7a61cc6f89bfffb8410af6662c9ce6ce (patch) | |
tree | 23626731e495185e1c889b98a9e7ca66a4813339 /macosx/tkMacOSXKeyboard.c | |
parent | 3e8df0bd27a22fd54be7c6b1b1e5b14b403371ba (diff) | |
parent | ab6d53027cf2347ee194bed0cb5ce40564f50558 (diff) | |
download | tk-2c7448ee7a61cc6f89bfffb8410af6662c9ce6ce.zip tk-2c7448ee7a61cc6f89bfffb8410af6662c9ce6ce.tar.gz tk-2c7448ee7a61cc6f89bfffb8410af6662c9ce6ce.tar.bz2 |
merge 8.6
Diffstat (limited to 'macosx/tkMacOSXKeyboard.c')
-rw-r--r-- | macosx/tkMacOSXKeyboard.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/macosx/tkMacOSXKeyboard.c b/macosx/tkMacOSXKeyboard.c index a64f81e..78bda9e 100644 --- a/macosx/tkMacOSXKeyboard.c +++ b/macosx/tkMacOSXKeyboard.c @@ -443,8 +443,11 @@ TkpGetString( * result. */ { (void) winPtr; /*unused*/ + int ch; + Tcl_DStringInit(dsPtr); - return Tcl_DStringAppend(dsPtr, eventPtr->xkey.trans_chars, -1); + return Tcl_DStringAppend(dsPtr, eventPtr->xkey.trans_chars, + TkUtfToUniChar(eventPtr->xkey.trans_chars, &ch)); } /* |