diff options
| author | root <root> | 2012-07-23 22:53:30 (GMT) |
|---|---|---|
| committer | root <root> | 2012-07-23 22:53:30 (GMT) |
| commit | 36acf3cb9145b3e88a43115b09a7f34dc9e1d11b (patch) | |
| tree | 16da99640cc5e50fca19e6bd42e61c929a083ccb /generic/tkClipboard.c | |
| parent | e2cfdce033fffc2b75e08a2c2a20ccaa1179c0a7 (diff) | |
| download | tk-36acf3cb9145b3e88a43115b09a7f34dc9e1d11b.zip tk-36acf3cb9145b3e88a43115b09a7f34dc9e1d11b.tar.gz tk-36acf3cb9145b3e88a43115b09a7f34dc9e1d11b.tar.bz2 | |
Fix for [Bug 3546073]:
Replace Tk_CreateWindow(... DisplayString(dispPtr->display)) with
direct call to TkAllocWindow().
Diffstat (limited to 'generic/tkClipboard.c')
| -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..168171b 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 = TkAllocWindow(dispPtr, + DefaultScreen(dispPtr->display), NULL); Tcl_Preserve((ClientData) dispPtr->clipWindow); atts.override_redirect = True; Tk_ChangeWindowAttributes(dispPtr->clipWindow, CWOverrideRedirect, &atts); |