Overview
| Comment: | Updated to set sane defaults if we are unable to load the requested encoding |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
e598e7780534fe2235814c65b4d09a91 |
| User & Date: | rkeene on 2010-09-26 04:45:32 |
| Other Links: | manifest | tags |
Context
|
2010-09-26
| ||
| 04:45 | Updated to hide errors emitted from `find' check-in: cee8b007e2 user: rkeene tags: trunk | |
| 04:45 | Updated to set sane defaults if we are unable to load the requested encoding check-in: e598e77805 user: rkeene tags: trunk | |
| 04:45 | Updated to check to see if required before building check-in: 0ed07039ad user: rkeene tags: trunk | |
Changes
Modified kitsh/buildsrc/kitsh-0.0/boot.tcl from [877050aa4b] to [5e7b5c786a].
| ︙ | ︙ | |||
86 87 88 89 90 91 92 |
} 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 != ""} {
| > | > > > > | > > | | | | | | < < < | 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 |
} 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 != ""} {
catch {
encoding system $::tclkit_system_encoding
}
}
unset -nocomplain ::tclkit_system_encoding
}
# If we've still not been able to set the encoding, revert to Tclkit defaults
if {[encoding system] eq "identity"} {
switch $::tcl_platform(platform) {
windows { encoding system cp1252 }
macintosh { encoding system macRoman }
default { encoding system iso8859-1 }
}
}
# now remount the executable with the correct encoding
vfs::filesystem unmount [lindex [::vfs::filesystem info] 0]
set noe [info nameofexecutable]
# Resolve symlinks
|
| ︙ | ︙ |