Import Tk 8.6.10
This commit is contained in:
@@ -169,7 +169,7 @@ SquareObjCmd(
|
||||
squarePtr->widgetCmd = Tcl_CreateObjCommand(interp,
|
||||
Tk_PathName(squarePtr->tkwin), SquareWidgetObjCmd, squarePtr,
|
||||
SquareDeletedProc);
|
||||
squarePtr->gc = None;
|
||||
squarePtr->gc = NULL;
|
||||
squarePtr->optionTable = optionTable;
|
||||
|
||||
if (Tk_InitOptions(interp, (char *) squarePtr, optionTable, tkwin)
|
||||
@@ -335,7 +335,7 @@ SquareConfigure(
|
||||
Tk_SetWindowBackground(squarePtr->tkwin,
|
||||
Tk_3DBorderColor(bgBorder)->pixel);
|
||||
Tcl_GetBooleanFromObj(NULL, squarePtr->doubleBufferPtr, &doubleBuffer);
|
||||
if ((squarePtr->gc == None) && (doubleBuffer)) {
|
||||
if ((squarePtr->gc == NULL) && doubleBuffer) {
|
||||
XGCValues gcValues;
|
||||
gcValues.function = GXcopy;
|
||||
gcValues.graphics_exposures = False;
|
||||
@@ -400,7 +400,7 @@ SquareObjEventProc(
|
||||
if (squarePtr->tkwin != NULL) {
|
||||
Tk_FreeConfigOptions((char *) squarePtr, squarePtr->optionTable,
|
||||
squarePtr->tkwin);
|
||||
if (squarePtr->gc != None) {
|
||||
if (squarePtr->gc != NULL) {
|
||||
Tk_FreeGC(squarePtr->display, squarePtr->gc);
|
||||
}
|
||||
squarePtr->tkwin = NULL;
|
||||
|
||||
Reference in New Issue
Block a user