diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-06-08 12:41:00 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-06-08 12:41:00 (GMT) |
| commit | 50d501f90b85fcd0a3beaf485da84379975c9504 (patch) | |
| tree | 4ed72822f24549fd22069c88ee1fc7d29bbdc45e /generic/tkCanvPs.c | |
| parent | 84cfc97d7f9469cb9f4406c0f26a15941de718d6 (diff) | |
| download | tk-50d501f90b85fcd0a3beaf485da84379975c9504.zip tk-50d501f90b85fcd0a3beaf485da84379975c9504.tar.gz tk-50d501f90b85fcd0a3beaf485da84379975c9504.tar.bz2 | |
Fix [2790615]: "update" performs Tk callbacks in its own stack frame.
by adding TCL_EVAL_GLOBAL in a lot of places.
Diffstat (limited to 'generic/tkCanvPs.c')
| -rw-r--r-- | generic/tkCanvPs.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tkCanvPs.c b/generic/tkCanvPs.c index 2cb4d27..bcd1d13 100644 --- a/generic/tkCanvPs.c +++ b/generic/tkCanvPs.c @@ -193,7 +193,7 @@ TkCanvPostscriptCmd( * such. */ - result = Tcl_EvalEx(interp, "::tk::ensure_psenc_is_loaded", -1, 0); + result = Tcl_EvalEx(interp, "::tk::ensure_psenc_is_loaded", -1, TCL_EVAL_GLOBAL); if (result != TCL_OK) { return result; } |