diff options
| author | hobbs <hobbs> | 2005-01-04 01:29:12 (GMT) |
|---|---|---|
| committer | hobbs <hobbs> | 2005-01-04 01:29:12 (GMT) |
| commit | aca80f792b0f988d2119abdc3ea424f0a73acb9c (patch) | |
| tree | 259e50ecc205c0730059825b521b3cb96b419a7f /win/tkWinWm.c | |
| parent | d3b80379966c513c6e33037267e93af3ead51771 (diff) | |
| download | tk-aca80f792b0f988d2119abdc3ea424f0a73acb9c.zip tk-aca80f792b0f988d2119abdc3ea424f0a73acb9c.tar.gz tk-aca80f792b0f988d2119abdc3ea424f0a73acb9c.tar.bz2 | |
* win/tkWinWm.c (TkWinWmCleanup): clean up layered window class.
This caused crash in reinit of Tk (as seen in plugin).
Diffstat (limited to 'win/tkWinWm.c')
| -rw-r--r-- | win/tkWinWm.c | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/win/tkWinWm.c b/win/tkWinWm.c index e9263ab..82795b4 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.85 2004/12/28 08:45:31 chengyemao Exp $ + * RCS: @(#) $Id: tkWinWm.c,v 1.86 2005/01/04 01:29:12 hobbs Exp $ */ #include "tkWinInt.h" @@ -1838,6 +1838,15 @@ TkWinWmCleanup(hInstance) tsdPtr->initialized = 0; UnregisterClass(TK_WIN_TOPLEVEL_CLASS_NAME, hInstance); +#ifndef TCL_THREADS + /* + * Clean up specialized class created for layered windows. + */ + if (setLayeredWindowAttributesProc != NULL) { + UnregisterClass(TK_WIN_TOPLEVEL_NOCDC_CLASS_NAME, hInstance); + setLayeredWindowAttributesProc = NULL; + } +#endif } /* @@ -7882,4 +7891,4 @@ long TkpWinToplevelOverrideRedirect(winPtr, reqValue) } } return reqValue; -}
\ No newline at end of file +} |