diff options
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); |