diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-06-20 13:32:27 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-06-20 13:32:27 (GMT) |
| commit | 90b1090817bbf37d8787cc9ed77f2a4ca7460bb7 (patch) | |
| tree | 2e9ba8fa7efcf309a1f5d5e054d1008281872b37 /win/tkWinTest.c | |
| parent | 0df448d72dc5f494bf12f7b51263f5564caf044b (diff) | |
| parent | ea636c850864a7b4a1086407483247fa2178a9c9 (diff) | |
| download | tk-90b1090817bbf37d8787cc9ed77f2a4ca7460bb7.zip tk-90b1090817bbf37d8787cc9ed77f2a4ca7460bb7.tar.gz tk-90b1090817bbf37d8787cc9ed77f2a4ca7460bb7.tar.bz2 | |
Merge trunk
Diffstat (limited to 'win/tkWinTest.c')
| -rw-r--r-- | win/tkWinTest.c | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/win/tkWinTest.c b/win/tkWinTest.c index 14e5433..f3ec298 100644 --- a/win/tkWinTest.c +++ b/win/tkWinTest.c @@ -175,12 +175,10 @@ AppendSystemError( } msg = msgBuf; } else { - Tcl_Encoding encoding; char *msgPtr; - encoding = Tcl_GetEncoding(NULL, "unicode"); - Tcl_ExternalToUtfDString(encoding, (char *) wMsgPtr, -1, &ds); - Tcl_FreeEncoding(encoding); + Tcl_DStringInit(&ds); + Tcl_UniCharToUtfDString(wMsgPtr, wcslen(wMsgPtr), &ds); LocalFree(wMsgPtr); msgPtr = Tcl_DStringValue(&ds); |