diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2021-01-05 20:41:27 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2021-01-05 20:41:27 (GMT) |
| commit | 496cff3ee18aff1069c341d282371190cff6563f (patch) | |
| tree | c67d771e8834d9aca6a8fc4345f9d053b5073cc7 /tools/tclZIC.tcl | |
| parent | 0f93742804d047a8de0fe3acda7b019daae7b273 (diff) | |
| parent | 124e36102e8b08023fe370defa49f89705d61a13 (diff) | |
| download | tcl-496cff3ee18aff1069c341d282371190cff6563f.zip tcl-496cff3ee18aff1069c341d282371190cff6563f.tar.gz tcl-496cff3ee18aff1069c341d282371190cff6563f.tar.bz2 | |
merge core-8-branch
Diffstat (limited to 'tools/tclZIC.tcl')
| -rwxr-xr-x | tools/tclZIC.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tools/tclZIC.tcl b/tools/tclZIC.tcl index 52b86ea..901814f 100755 --- a/tools/tclZIC.tcl +++ b/tools/tclZIC.tcl @@ -1263,7 +1263,7 @@ proc writeZones {outDir} { # Write the data to the information file set f [open $fileName w] - fconfigure $f -translation lf + fconfigure $f -translation lf -encoding utf-8 puts $f "\# created by $::argv0 - do not edit" puts $f "" puts $f [list set TZData(:$zoneName) $data] @@ -1316,7 +1316,7 @@ proc writeLinks {outDir} { # Write the file set f [open $fileName w] - fconfigure $f -translation lf + fconfigure $f -translation lf -encoding utf-8 puts $f "\# created by $::argv0 - do not edit" puts $f $ifCmd puts $f $setCmd |