diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-05-28 19:30:27 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-05-28 19:30:27 (GMT) |
| commit | bf9e2cb2dfa20c810fdacb68cc1551046be9cd2f (patch) | |
| tree | 930722d5088e4c248c05c2d8857a5dea7a7a1fa6 | |
| parent | 235be5061fb7d0b7bf7b0844e2d707e56a54c5e5 (diff) | |
| download | tcl-bug_3525762.zip tcl-bug_3525762.tar.gz tcl-bug_3525762.tar.bz2 | |
explicitely specify encoding in DdeCreateStringHandlebug_3525762
| -rw-r--r-- | win/tclWinDde.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/win/tclWinDde.c b/win/tclWinDde.c index 9f6a41e..8e74f73 100644 --- a/win/tclWinDde.c +++ b/win/tclWinDde.c @@ -241,7 +241,7 @@ Initialize(void) ddeIsServer = 1; Tcl_CreateExitHandler(DdeExitProc, NULL); ddeServiceGlobal = DdeCreateStringHandle(ddeInstance, - TCL_DDE_SERVICE_NAME, 0); + TCL_DDE_SERVICE_NAME, CP_WINUNICODE); DdeNameService(ddeInstance, ddeServiceGlobal, 0L, DNS_REGISTER); } else { ddeIsServer = 0; @@ -932,8 +932,8 @@ MakeDdeConnection( HSZ ddeTopic, ddeService; HCONV ddeConv; - ddeService = DdeCreateStringHandle(ddeInstance, TCL_DDE_SERVICE_NAME, 0); - ddeTopic = DdeCreateStringHandle(ddeInstance, name, 0); + ddeService = DdeCreateStringHandle(ddeInstance, TCL_DDE_SERVICE_NAME, CP_WINUNICODE); + ddeTopic = DdeCreateStringHandle(ddeInstance, name, CP_WINUNICODE); ddeConv = DdeConnect(ddeInstance, ddeService, ddeTopic, NULL); DdeFreeStringHandle(ddeInstance, ddeService); |