diff options
| author | dgp <dgp@users.sourceforge.net> | 2013-09-23 12:18:45 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2013-09-23 12:18:45 (GMT) |
| commit | b54c2a5958b12875dc5a32cc1f09da20e23b087d (patch) | |
| tree | 062984494427a7eb2f38601d962177e25e6e99d7 /generic/tclIOUtil.c | |
| parent | b486039ca76d9b03ad8d9bdec1e914a4f88f88e8 (diff) | |
| download | tcl-b54c2a5958b12875dc5a32cc1f09da20e23b087d.zip tcl-b54c2a5958b12875dc5a32cc1f09da20e23b087d.tar.gz tcl-b54c2a5958b12875dc5a32cc1f09da20e23b087d.tar.bz2 | |
revert mistaken commit of experiment
Diffstat (limited to 'generic/tclIOUtil.c')
| -rw-r--r-- | generic/tclIOUtil.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclIOUtil.c b/generic/tclIOUtil.c index 6332453..6259216 100644 --- a/generic/tclIOUtil.c +++ b/generic/tclIOUtil.c @@ -1944,7 +1944,7 @@ TclNREvalFile( iPtr->evalFlags |= TCL_EVAL_FILE; TclNRAddCallback(interp, EvalFileCallback, oldScriptFile, pathPtr, objPtr, NULL); - return TclNREvalObjEx(interp, objPtr, TCL_EVAL_DIRECT, NULL, INT_MIN); + return TclNREvalObjEx(interp, objPtr, 0, NULL, INT_MIN); } static int |