summaryrefslogtreecommitdiffstats
path: root/unix
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-06-08 15:26:37 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-06-08 15:26:37 (GMT)
commite1c1025a87901b4aed358668090787dcbd9c66a4 (patch)
tree013d41edac7cf35604f8d981794561d0fbdf841b /unix
parent25b8569df74d9afc67272322fe89a9ff6dc05a2e (diff)
parentbbee82687e00816590da59ee75cfb3aa06d59476 (diff)
downloadtk-e1c1025a87901b4aed358668090787dcbd9c66a4.zip
tk-e1c1025a87901b4aed358668090787dcbd9c66a4.tar.gz
tk-e1c1025a87901b4aed358668090787dcbd9c66a4.tar.bz2
Merge 8.6
Diffstat (limited to 'unix')
-rw-r--r--unix/tkUnixScale.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/unix/tkUnixScale.c b/unix/tkUnixScale.c
index b090c4f..1b4fefe 100644
--- a/unix/tkUnixScale.c
+++ b/unix/tkUnixScale.c
@@ -577,7 +577,7 @@ TkpDisplayScale(
Tcl_DStringAppend(&buf, scalePtr->command, -1);
Tcl_DStringAppend(&buf, " ", -1);
Tcl_DStringAppend(&buf, string, -1);
- result = Tcl_EvalEx(interp, Tcl_DStringValue(&buf), -1, 0);
+ result = Tcl_EvalEx(interp, Tcl_DStringValue(&buf), -1, TCL_EVAL_GLOBAL);
Tcl_DStringFree(&buf);
if (result != TCL_OK) {
Tcl_AddErrorInfo(interp, "\n (command executed by scale)");