Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Minor tweak for wm forget |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
6ea155fbadce52861f9332d9d9c50bba |
| User & Date: | kevin_walzer 2011-07-27 02:33:29 |
Context
|
2011-07-28
| ||
| 08:50 | [Bug 3380684] XEmptyRegion prototype doesn't match usage check-in: 316727a0 user: jan.nijtmans tags: trunk | |
|
2011-07-27
| ||
| 17:25 | merge to rc check-in: cddaa4f2 user: dgp tags: core-8-6-b2-rc | |
| 02:33 | Minor tweak for wm forget check-in: 6ea155fb user: kevin_walzer tags: trunk | |
|
2011-07-26
| ||
| 12:40 | Minor fix of wm forget implementation on Aqua check-in: 375dd737 user: kevin_walzer tags: trunk | |
Changes
Changes to macosx/tkMacOSXWindowEvent.c.
| ︙ | ︙ | |||
268 269 270 271 272 273 274 |
"::tk::mac::OnShow" : "::tk::mac::OnHide");
Tcl_CmdInfo dummy;
if (_eventInterp && Tcl_GetCommandInfo(_eventInterp, cmd, &dummy)) {
int code = Tcl_EvalEx(_eventInterp, cmd, -1, TCL_EVAL_GLOBAL);
if (code != TCL_OK) {
| | | 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 |
"::tk::mac::OnShow" : "::tk::mac::OnHide");
Tcl_CmdInfo dummy;
if (_eventInterp && Tcl_GetCommandInfo(_eventInterp, cmd, &dummy)) {
int code = Tcl_EvalEx(_eventInterp, cmd, -1, TCL_EVAL_GLOBAL);
if (code != TCL_OK) {
Tcl_BackgroundError(_eventInterp);
}
Tcl_ResetResult(_eventInterp);
}
}
- (void) displayChanged: (NSNotification *) notification
{
|
| ︙ | ︙ | |||
704 705 706 707 708 709 710 |
Tcl_Preserve(interp);
result = Tcl_GlobalEval(interp, protPtr->command);
if (result != TCL_OK) {
Tcl_AddErrorInfo(interp, "\n (command for \"");
Tcl_AddErrorInfo(interp,
Tk_GetAtomName((Tk_Window) winPtr, protocol));
Tcl_AddErrorInfo(interp, "\" window manager protocol)");
| | | 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 |
Tcl_Preserve(interp);
result = Tcl_GlobalEval(interp, protPtr->command);
if (result != TCL_OK) {
Tcl_AddErrorInfo(interp, "\n (command for \"");
Tcl_AddErrorInfo(interp,
Tk_GetAtomName((Tk_Window) winPtr, protocol));
Tcl_AddErrorInfo(interp, "\" window manager protocol)");
Tcl_BackgroundError(interp);
}
Tcl_Release(interp);
Tcl_Release(protPtr);
return;
}
}
|
| ︙ | ︙ |
Changes to macosx/tkMacOSXWm.c.
| ︙ | ︙ | |||
1639 1640 1641 1642 1643 1644 1645 |
register Tk_Window frameWin = (Tk_Window)winPtr;
if (Tk_IsTopLevel(frameWin)) {
MacDrawable *macWin = (MacDrawable *) winPtr->parentPtr->window;
TkFocusJoin(winPtr);
| | | | 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 |
register Tk_Window frameWin = (Tk_Window)winPtr;
if (Tk_IsTopLevel(frameWin)) {
MacDrawable *macWin = (MacDrawable *) winPtr->parentPtr->window;
TkFocusJoin(winPtr);
Tk_UnmapWindow(frameWin);
TkWmDeadWindow(macWin);
RemapWindows(winPtr, macWin);
winPtr->flags &=~(TK_TOP_HIERARCHY|TK_TOP_LEVEL|TK_HAS_WRAPPER|TK_WIN_MANAGED);
/*
* Flags (above) must be cleared before calling TkMapTopFrame (below).
*/
|
| ︙ | ︙ |