diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-09-04 13:10:04 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-09-04 13:10:04 (GMT) |
commit | 3f5641ced949113a086adc0abd956b7d42f8f8f3 (patch) | |
tree | 96975854e71674d85f1bf10c3ca7b0bbf69f41a5 /unix/tkUnixSend.c | |
parent | b1ce6a96d8e208270131c02c90e90ec29b11b704 (diff) | |
download | tk-3f5641ced949113a086adc0abd956b7d42f8f8f3.zip tk-3f5641ced949113a086adc0abd956b7d42f8f8f3.tar.gz tk-3f5641ced949113a086adc0abd956b7d42f8f8f3.tar.bz2 |
Fix [d2396a9f1b]: [send] with options returns weird strings on X11
Diffstat (limited to 'unix/tkUnixSend.c')
-rw-r--r-- | unix/tkUnixSend.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/unix/tkUnixSend.c b/unix/tkUnixSend.c index 72b2b1e..3afe9e7 100644 --- a/unix/tkUnixSend.c +++ b/unix/tkUnixSend.c @@ -982,7 +982,7 @@ Tk_SendObjCmd( return TCL_ERROR; } for (i = 1; i < objc; i++) { - if (Tcl_GetIndexFromObjStruct(interp, objv[i], sendOptions, + if (Tcl_GetIndexFromObjStruct(NULL, objv[i], sendOptions, sizeof(char *), "option", 0, &index) != TCL_OK) { break; } |