diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-09-01 14:00:17 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-09-01 14:00:17 (GMT) |
commit | 750b6be2ef53c7e44c682bdeccd64a10e04e0598 (patch) | |
tree | f41991f1dd9fbeee5626f31fab5f62a89e6bb851 /generic/tclIOUtil.c | |
parent | e213c36286fab987488d2dc11622b92813a51e10 (diff) | |
parent | 6832ae16ff4f18e496fe00d20334e627e2acf525 (diff) | |
download | tcl-750b6be2ef53c7e44c682bdeccd64a10e04e0598.zip tcl-750b6be2ef53c7e44c682bdeccd64a10e04e0598.tar.gz tcl-750b6be2ef53c7e44c682bdeccd64a10e04e0598.tar.bz2 |
merge core-8-6-branch
Diffstat (limited to 'generic/tclIOUtil.c')
-rw-r--r-- | generic/tclIOUtil.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclIOUtil.c b/generic/tclIOUtil.c index 6364346..00a0359 100644 --- a/generic/tclIOUtil.c +++ b/generic/tclIOUtil.c @@ -1783,7 +1783,7 @@ Tcl_FSEvalFileEx( * this cross-platform to allow for scripted documents. [Bug: 2040] */ - Tcl_SetChannelOption(interp, chan, "-eofchar", "\32"); + Tcl_SetChannelOption(interp, chan, "-eofchar", "\32 {}"); /* * If the encoding is specified, set it for the channel. Else don't touch @@ -1917,7 +1917,7 @@ TclNREvalFile( * this cross-platform to allow for scripted documents. [Bug: 2040] */ - Tcl_SetChannelOption(interp, chan, "-eofchar", "\32"); + Tcl_SetChannelOption(interp, chan, "-eofchar", "\32 {}"); /* * If the encoding is specified, set it for the channel. Else don't touch |