diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2024-04-09 15:23:22 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2024-04-09 15:23:22 (GMT) |
| commit | 5f873c0783342767b38a977bf2e3ebd8eb23f19f (patch) | |
| tree | d73482034012a3ea838beca30d4a0af691c478e5 /tools | |
| parent | 8b6f1f2a55be3da5e528cfcd398cfe454911d52f (diff) | |
| download | tcl-5f873c0783342767b38a977bf2e3ebd8eb23f19f.zip tcl-5f873c0783342767b38a977bf2e3ebd8eb23f19f.tar.gz tcl-5f873c0783342767b38a977bf2e3ebd8eb23f19f.tar.bz2 | |
Add ability to regenerate tclOOScript.h to Win build
Diffstat (limited to 'tools')
| -rw-r--r-- | tools/makeHeader.tcl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/tools/makeHeader.tcl b/tools/makeHeader.tcl index 17526e0..e20e336 100644 --- a/tools/makeHeader.tcl +++ b/tools/makeHeader.tcl @@ -108,6 +108,7 @@ namespace eval makeHeader { proc updateTemplateFile {headerFile scriptLines} { set f [open $headerFile "r+"] try { + chan configure $f -translation {auto lf} set content [split [chan read -nonewline $f] "\n"] updateTemplate content [stripSurround $scriptLines] chan seek $f 0 |