diff options
| author | andy <andrew.m.goth@gmail.com> | 2017-08-08 16:42:24 (GMT) |
|---|---|---|
| committer | andy <andrew.m.goth@gmail.com> | 2017-08-08 16:42:24 (GMT) |
| commit | a3d45605c51fcdd9ebca4766ef1b52c1877f8cfb (patch) | |
| tree | 1fd337b91af35f464d5865a98ccf702bd936b4a2 /generic | |
| parent | 1ad27f0d877fb2629821863e4c85a764814b9f32 (diff) | |
| parent | af03c7e562cc37087f276fcd7aed692c5537056a (diff) | |
| download | tcl-a3d45605c51fcdd9ebca4766ef1b52c1877f8cfb.zip tcl-a3d45605c51fcdd9ebca4766ef1b52c1877f8cfb.tar.gz tcl-a3d45605c51fcdd9ebca4766ef1b52c1877f8cfb.tar.bz2 | |
Merge core-8-6-branch
Diffstat (limited to 'generic')
| -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 e00b9ac..41e218f 100644 --- a/generic/tclIOUtil.c +++ b/generic/tclIOUtil.c @@ -1762,7 +1762,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 @@ -1896,7 +1896,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 |