diff options
| author | welch <welch@noemail.net> | 1998-06-27 18:06:37 (GMT) |
|---|---|---|
| committer | welch <welch@noemail.net> | 1998-06-27 18:06:37 (GMT) |
| commit | a666fb3d6fa6f1ae0921e33edb142295062e2296 (patch) | |
| tree | 759f8786c82028afeb67bd971309b7b328d81d7f /win/tkWinWindow.c | |
| parent | 9e54810ab83431d4976021d15005c5fe8b4bab5a (diff) | |
| download | tk-a666fb3d6fa6f1ae0921e33edb142295062e2296.zip tk-a666fb3d6fa6f1ae0921e33edb142295062e2296.tar.gz tk-a666fb3d6fa6f1ae0921e33edb142295062e2296.tar.bz2 | |
plugin updates
FossilOrigin-Name: a31d73e5fbaa868008186067e2535e2f9c3140a0
Diffstat (limited to 'win/tkWinWindow.c')
| -rw-r--r-- | win/tkWinWindow.c | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/win/tkWinWindow.c b/win/tkWinWindow.c index 2b8eb41..dbac589 100644 --- a/win/tkWinWindow.c +++ b/win/tkWinWindow.c @@ -114,7 +114,12 @@ Tk_Window Tk_HWNDToWindow(hwnd) HWND hwnd; { - Tcl_HashEntry *entryPtr = Tcl_FindHashEntry(&windowTable, (char*)hwnd); + Tcl_HashEntry *entryPtr; + if (!initialized) { + Tcl_InitHashTable(&windowTable, TCL_ONE_WORD_KEYS); + initialized = 1; + } + entryPtr = Tcl_FindHashEntry(&windowTable, (char*)hwnd); if (entryPtr != NULL) { return (Tk_Window) Tcl_GetHashValue(entryPtr); } |