Differences From Artifact [fad62aecf7]:
- File
kitsh/buildsrc/kitsh-0.0/boot.tcl
— part of check-in
[66535d6924]
at
2010-09-26 04:43:48
on branch trunk
— KitCreator 0.3.0.x
Added support for using ZIP archives if MK4 fails to build
Removed support for pure-Tcl MK4 (it didn't work) (user: rkeene, size: 3740) [annotate] [blame] [check-ins using]
To Artifact [877050aa4b]:
- File kitsh/buildsrc/kitsh-0.0/boot.tcl — part of check-in [095125b887] at 2010-09-26 04:45:24 on branch trunk — Updated to set encoding from system (untested) (user: rkeene, size: 3939) [annotate] [blame] [check-ins using]
| ︙ | ︙ | |||
85 86 87 88 89 90 91 |
librarypath [info library]
} else {
encoding dirs [list [file join [info library] encoding]] ;# TIP 258
}
# fix system encoding, if it wasn't properly set up (200207.004 bug)
if {[encoding system] eq "identity"} {
| > > > | | | | | > > > | 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 |
librarypath [info library]
} else {
encoding dirs [list [file join [info library] encoding]] ;# TIP 258
}
# fix system encoding, if it wasn't properly set up (200207.004 bug)
if {[encoding system] eq "identity"} {
if {[info exists ::tclkit_system_encoding] && $::tclkit_system_encoding != ""} {
encoding system $::tclkit_system_encoding
} else {
switch $::tcl_platform(platform) {
windows { encoding system cp1252 }
macintosh { encoding system macRoman }
default { encoding system iso8859-1 }
}
}
unset -nocomplain ::tclkit_system_encoding
}
# now remount the executable with the correct encoding
vfs::filesystem unmount [lindex [::vfs::filesystem info] 0]
set noe [info nameofexecutable]
|
| ︙ | ︙ |