diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-12-04 10:04:33 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-12-04 10:04:33 (GMT) |
commit | 4fa48d135ae0efa812f9848c171cf70047a687d7 (patch) | |
tree | bd8e6f0d5a5d026c064b1a8a9a4113a40708232b /library/tcltest | |
parent | 86cfccca916781bdd91504a7d7b03d78cb6acfa8 (diff) | |
parent | 25084dcd33f266a26bce646b6388334fe6ef6127 (diff) | |
download | tcl-4fa48d135ae0efa812f9848c171cf70047a687d7.zip tcl-4fa48d135ae0efa812f9848c171cf70047a687d7.tar.gz tcl-4fa48d135ae0efa812f9848c171cf70047a687d7.tar.bz2 |
Merge 8.6
Diffstat (limited to 'library/tcltest')
-rw-r--r-- | library/tcltest/tcltest.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/tcltest/tcltest.tcl b/library/tcltest/tcltest.tcl index 33ad322..7dc75d7 100644 --- a/library/tcltest/tcltest.tcl +++ b/library/tcltest/tcltest.tcl @@ -3084,7 +3084,7 @@ proc tcltest::makeFile {contents name {directory ""}} { fconfigure $fd -translation lf if {[package vsatisfies [package provide Tcl] 8.7-]} { fconfigure $fd -encoding utf-8 - } + } if {[string index $contents end] eq "\n"} { puts -nonewline $fd $contents } else { |