diff options
| author | Kevin Walzer <kw@codebykevin.com> | 2012-10-02 00:45:42 (GMT) |
|---|---|---|
| committer | Kevin Walzer <kw@codebykevin.com> | 2012-10-02 00:45:42 (GMT) |
| commit | ba783367aeb76fb86aec2e5fd8dd4c2012277d51 (patch) | |
| tree | 7c186710f13ed6b1bdde498606f66a7433dbbfbc /generic/tkClipboard.c | |
| parent | ccdd8d3ab00162ae1628413134fbda50e17212e9 (diff) | |
| download | tk-ba783367aeb76fb86aec2e5fd8dd4c2012277d51.zip tk-ba783367aeb76fb86aec2e5fd8dd4c2012277d51.tar.gz tk-ba783367aeb76fb86aec2e5fd8dd4c2012277d51.tar.bz2 | |
Backport of dgp fixes on 50e0c049b2 to 8.5
Diffstat (limited to 'generic/tkClipboard.c')
| -rw-r--r-- | generic/tkClipboard.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/generic/tkClipboard.c b/generic/tkClipboard.c index 09e600a..c6748a1 100644 --- a/generic/tkClipboard.c +++ b/generic/tkClipboard.c @@ -648,6 +648,8 @@ TkClipInit( dispPtr->clipWindow = (Tk_Window) TkAllocWindow(dispPtr, DefaultScreen(dispPtr->display), NULL); Tcl_Preserve((ClientData) dispPtr->clipWindow); + ((TkWindow *) dispPtr->clipWindow)->flags |= TK_TOP_HIERARCHY|TK_TOP_LEVEL|TK_HAS_WRAPPER|TK_WIN_MANAGED; + TkWmNewWindow((TkWindow *) dispPtr->clipWindow); atts.override_redirect = True; Tk_ChangeWindowAttributes(dispPtr->clipWindow, CWOverrideRedirect, &atts); Tk_MakeWindowExist(dispPtr->clipWindow); |