diff options
| author | dgp <dgp@users.sourceforge.net> | 2012-11-07 19:18:39 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2012-11-07 19:18:39 (GMT) |
| commit | efd0a2a647ff37c0d760b7aed8b73fd4ba7a2859 (patch) | |
| tree | c39c29ce59e7d67c0e398481b576362f633a0e16 /generic | |
| parent | e2ac5a4b6c3a15ab68a50ea396b0ae86587733aa (diff) | |
| parent | 7c2c0457c19b2402027024104641230c5d849f27 (diff) | |
| download | tk-efd0a2a647ff37c0d760b7aed8b73fd4ba7a2859.zip tk-efd0a2a647ff37c0d760b7aed8b73fd4ba7a2859.tar.gz tk-efd0a2a647ff37c0d760b7aed8b73fd4ba7a2859.tar.bz2 | |
merge 8.5
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tkFocus.c | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/generic/tkFocus.c b/generic/tkFocus.c index 4814c17..85093ee 100644 --- a/generic/tkFocus.c +++ b/generic/tkFocus.c @@ -160,9 +160,7 @@ Tk_FocusObjCmd( if (newPtr == NULL) { return TCL_ERROR; } - if (!(newPtr->flags & TK_ALREADY_DEAD)) { - TkSetFocusWin(newPtr, 0); - } + TkSetFocusWin(newPtr, 0); return TCL_OK; } } @@ -552,6 +550,14 @@ TkSetFocusWin( TkWindow *topLevelPtr; int allMapped, serial; + /* + * Don't set focus if window is already dead. [Bug 3574708] + */ + + if (winPtr->flags & TK_ALREADY_DEAD) { + return; + } + displayFocusPtr = FindDisplayFocusInfo(winPtr->mainPtr, winPtr->dispPtr); /* |