diff options
author | jenglish <jenglish@flightlab.com> | 2012-07-23 23:12:05 (GMT) |
---|---|---|
committer | jenglish <jenglish@flightlab.com> | 2012-07-23 23:12:05 (GMT) |
commit | 62010718bec20e262eae5eaa63b0b13f41a28a98 (patch) | |
tree | 69d870ad292b6b0ea514886aaeefbff76c7110d6 /generic | |
parent | ef4e126244feb950880f9638591e49d37ed23a26 (diff) | |
parent | aa2b239a91a1839e7274d0bd32df0046a2140897 (diff) | |
download | tk-62010718bec20e262eae5eaa63b0b13f41a28a98.zip tk-62010718bec20e262eae5eaa63b0b13f41a28a98.tar.gz tk-62010718bec20e262eae5eaa63b0b13f41a28a98.tar.bz2 |
Fix for [Bug 3546073]:
Replace Tk_CreateWindow(... DisplayString(dispPtr->display)) with
direct call to TkAllocWindow().
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 e153064..3687033 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, NULL, "_clip", - DisplayString(dispPtr->display)); - if (dispPtr->clipWindow == NULL) { - return TCL_ERROR; - } + dispPtr->clipWindow = TkAllocWindow(dispPtr, + DefaultScreen(dispPtr->display), NULL); Tcl_Preserve(dispPtr->clipWindow); atts.override_redirect = True; Tk_ChangeWindowAttributes(dispPtr->clipWindow, CWOverrideRedirect, &atts); |