diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-09-02 09:11:35 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-09-02 09:11:35 (GMT) |
commit | e8418353415aef1a836e456878799d2e2fa81a29 (patch) | |
tree | 401ce00d53f4e02ade85d8100792153d21cc3dc7 /win/tkWinWm.c | |
parent | aea04350f6b4080423ac8aa8638d4bc6152a5ac5 (diff) | |
parent | a32f271e085255f83c0122e58c78a5095959fa40 (diff) | |
download | tk-e8418353415aef1a836e456878799d2e2fa81a29.zip tk-e8418353415aef1a836e456878799d2e2fa81a29.tar.gz tk-e8418353415aef1a836e456878799d2e2fa81a29.tar.bz2 |
Fix [0189a9ae39]: Use of Tk_Uid in Tk API
Diffstat (limited to 'win/tkWinWm.c')
-rw-r--r-- | win/tkWinWm.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/win/tkWinWm.c b/win/tkWinWm.c index 8aef4fa..c2d1683 100644 --- a/win/tkWinWm.c +++ b/win/tkWinWm.c @@ -3070,7 +3070,7 @@ WmAttributesCmd( } wmPtr->alpha = dval; } else { /* -transparentcolor */ - const char *crefstr = Tcl_GetStringFromObj(objv[i+1], &length); + (void)Tcl_GetStringFromObj(objv[i+1], &length); if (length == 0) { /* reset to no transparent color */ @@ -3080,7 +3080,7 @@ WmAttributesCmd( } } else { XColor *cPtr = - Tk_GetColor(interp, tkwin, crefstr); + Tk_AllocColorFromObj(interp, tkwin, objv[i+1]); if (cPtr == NULL) { return TCL_ERROR; } |