summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorjenglish <jenglish@flightlab.com>2012-07-23 23:12:05 (GMT)
committerjenglish <jenglish@flightlab.com>2012-07-23 23:12:05 (GMT)
commit12b2afd60078f02d9df7713baa51481b8faa07a8 (patch)
tree69d870ad292b6b0ea514886aaeefbff76c7110d6 /generic
parent21e96102ddbd3781d1c2da0d952e63c046f1413b (diff)
parentc315d3e456e6fe5c0abc226702265e84c68dac35 (diff)
downloadtk-12b2afd60078f02d9df7713baa51481b8faa07a8.zip
tk-12b2afd60078f02d9df7713baa51481b8faa07a8.tar.gz
tk-12b2afd60078f02d9df7713baa51481b8faa07a8.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.c7
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);