diff options
| author | dgp@users.sourceforge.net <dgp> | 2013-09-23 12:18:45 (GMT) |
|---|---|---|
| committer | dgp@users.sourceforge.net <dgp> | 2013-09-23 12:18:45 (GMT) |
| commit | b78228acbb6e8859ff70b6356a27bf59f83ea97e (patch) | |
| tree | 062984494427a7eb2f38601d962177e25e6e99d7 | |
| parent | af3b72e020ec185c0c29b74576708d3b9177665d (diff) | |
| download | tcl-b78228acbb6e8859ff70b6356a27bf59f83ea97e.zip tcl-b78228acbb6e8859ff70b6356a27bf59f83ea97e.tar.gz tcl-b78228acbb6e8859ff70b6356a27bf59f83ea97e.tar.bz2 | |
revert mistaken commit of experiment
| -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 |