Imported Tk 8.6.9

This commit is contained in:
Steve Dower
2018-12-11 10:05:28 -08:00
parent 753ac6b037
commit 5ba5cbc9af
184 changed files with 6223 additions and 1994 deletions

View File

@@ -172,9 +172,9 @@ ImageCreate(
timPtr->interp = interp;
timPtr->width = 30;
timPtr->height = 15;
timPtr->imageName = ckalloc((unsigned) (strlen(name) + 1));
timPtr->imageName = ckalloc(strlen(name) + 1);
strcpy(timPtr->imageName, name);
timPtr->varName = ckalloc((unsigned) (strlen(varName) + 1));
timPtr->varName = ckalloc(strlen(varName) + 1);
strcpy(timPtr->varName, varName);
Tcl_CreateObjCommand(interp, name, ImageObjCmd, timPtr, NULL);
*clientDataPtr = timPtr;