diff options
| author | dgp <dgp@users.sourceforge.net> | 2012-07-24 16:29:22 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2012-07-24 16:29:22 (GMT) |
| commit | 9df198975e0632b7c50b9ee5ee63192f6f29e87a (patch) | |
| tree | 2fdc28b79d7af8d482a4bdd3fc00b6a781593a7f /generic | |
| parent | 676fab8fd449abcc70079637c0547bf99e705e7d (diff) | |
| parent | 5622724370381defbc456e36d2d5e6234cb964e8 (diff) | |
| download | tk-9df198975e0632b7c50b9ee5ee63192f6f29e87a.zip tk-9df198975e0632b7c50b9ee5ee63192f6f29e87a.tar.gz tk-9df198975e0632b7c50b9ee5ee63192f6f29e87a.tar.bz2 | |
merge 8.5
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tkClipboard.c | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/generic/tkClipboard.c b/generic/tkClipboard.c index 9428894..09e600a 100644 --- a/generic/tkClipboard.c +++ b/generic/tkClipboard.c @@ -645,11 +645,8 @@ TkClipInit( * and set up an event handler for it. */ - dispPtr->clipWindow = Tk_CreateWindow(interp, (Tk_Window) NULL, - "_clip", DisplayString(dispPtr->display)); - if (dispPtr->clipWindow == NULL) { - return TCL_ERROR; - } + dispPtr->clipWindow = (Tk_Window) TkAllocWindow(dispPtr, + DefaultScreen(dispPtr->display), NULL); Tcl_Preserve((ClientData) dispPtr->clipWindow); atts.override_redirect = True; Tk_ChangeWindowAttributes(dispPtr->clipWindow, CWOverrideRedirect, &atts); |