diff options
author | hobbs <hobbs@noemail.net> | 2000-02-26 03:11:07 (GMT) |
---|---|---|
committer | hobbs <hobbs@noemail.net> | 2000-02-26 03:11:07 (GMT) |
commit | 1fe2690d4d10593172e5203f39741ca23e4d1ab8 (patch) | |
tree | bfaae585f37dcf3702eed0899443dd2db15ceea7 /win | |
parent | 0827bc720cd817fb9ba86260fbbb2ea9bf9d2815 (diff) | |
download | tk-1fe2690d4d10593172e5203f39741ca23e4d1ab8.zip tk-1fe2690d4d10593172e5203f39741ca23e4d1ab8.tar.gz tk-1fe2690d4d10593172e5203f39741ca23e4d1ab8.tar.bz2 |
* win/tkWinWm.c (RaiseWinWhenIdle): Checked for the possibility
that the window could be destroyed (can occur with
wm deiconify .toplevel; destroy .toplevel).
FossilOrigin-Name: e60a421ad77f1d6f1edc40ab21fd480b4be24977
Diffstat (limited to 'win')
-rw-r--r-- | win/tkWinWm.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/win/tkWinWm.c b/win/tkWinWm.c index e9a117a..2b1da14 100644 --- a/win/tkWinWm.c +++ b/win/tkWinWm.c @@ -12,7 +12,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkWinWm.c,v 1.20 2000/02/01 11:41:44 hobbs Exp $ + * RCS: @(#) $Id: tkWinWm.c,v 1.21 2000/02/26 03:11:07 hobbs Exp $ */ #include "tkWinInt.h" @@ -4550,6 +4550,9 @@ RaiseWinWhenIdle(clientData) { register TkWindow *winPtr = (TkWindow *) clientData; + if ((winPtr == NULL) || (winPtr->flags & TK_ALREADY_DEAD)) { + return; + } if (winPtr->wmInfoPtr->flags & WM_UPDATE_PENDING) { Tcl_CancelIdleCall(UpdateGeometryInfo, (ClientData) winPtr); UpdateGeometryInfo((ClientData) winPtr); |