diff options
| -rw-r--r-- | macosx/tkMacOSXWm.c | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/macosx/tkMacOSXWm.c b/macosx/tkMacOSXWm.c index 965edd5..23d3e1f 100644 --- a/macosx/tkMacOSXWm.c +++ b/macosx/tkMacOSXWm.c @@ -189,7 +189,7 @@ static const Tk_GeomMgr wmMgrType = { * The following keeps state for Aqua dock icon bounce notification. */ -static int tkMacOSXWmAttrNotifyVal = 0; +static int tkMacOSXWmAttrNotifyVal = 0; /* * Hash table for Mac Window -> TkWindow mapping. @@ -412,6 +412,8 @@ static void RemapWindows(TkWindow *winPtr, kWindowNoActivatesAttribute)) ? NO : YES; } + + #if DEBUG_ZOMBIES - (id) retain { @@ -782,6 +784,10 @@ TkWmMapWindow( XMapWindow(winPtr->display, winPtr->window); + /*Add window to Window menu.*/ + NSWindow *win = TkMacOSXDrawableWindow(winPtr->window); + [win setExcludedFromWindowsMenu:NO]; + } /* @@ -3516,6 +3522,10 @@ WmWithdrawCmd( return TCL_ERROR; } TkpWmSetState(winPtr, WithdrawnState); + /*Remove window from Window menu.*/ + NSWindow *win = TkMacOSXDrawableWindow(winPtr->window); + [win setExcludedFromWindowsMenu:YES]; + return TCL_OK; } |