diff options
| -rw-r--r-- | macosx/tkMacOSXWm.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/macosx/tkMacOSXWm.c b/macosx/tkMacOSXWm.c index eccffdb..345d66e 100644 --- a/macosx/tkMacOSXWm.c +++ b/macosx/tkMacOSXWm.c @@ -6698,7 +6698,6 @@ TkMacOSXMakeRealWindowExist( if (hPtr) { tabbingId = Tcl_GetHashValue(hPtr); Tcl_DeleteHashEntry(hPtr); - ckfree(tabbingId); } hPtr = Tcl_FindHashEntry(&pathnameToTabbingMode, Tk_PathName(winPtr)); if (hPtr) { @@ -6763,6 +6762,9 @@ TkMacOSXMakeRealWindowExist( [window setTabbingIdentifier: identifier]; [window setTabbingMode: tabbingMode]; #endif + if (tabbingId) { + ckfree(tabbingId); + } TKContentView *contentView = [[TKContentView alloc] initWithFrame:NSZeroRect]; [window setContentView:contentView]; |