Differences From Artifact [6dee5fa1e9]:
- File
kitsh/buildsrc/kitsh-0.0/boot.tcl
— part of check-in
[77e40265de]
at
2010-09-26 04:49:35
on branch trunk
— Updated issue with opening directory
Updated to not panic if native encodings cannot be found (user: rkeene, size: 4087) [annotate] [blame] [check-ins using]
To Artifact [f82ab7409d]:
- File kitsh/buildsrc/kitsh-0.0/boot.tcl — part of check-in [7d18befb92] at 2011-05-21 15:09:07 on branch merge-kitdll-kitsh-common — More work towards integrating KitDLL and KitSH -- C-VFS tested working within KitSH (user: rkeene, size: 4160) [annotate] [blame] [check-ins using]
| ︙ | ︙ | |||
70 71 72 73 74 75 76 77 78 79 80 81 82 83 |
}
}
seek $::tclKitStorage_fd 0
set vfsHandler [list ::vfs::zip::handler $::tclKitStorage_fd]
unset ::tclKitStorage_fd
}
}
# mount the executable, i.e. make all runtime files available
vfs::filesystem mount $noe $vfsHandler
# alter path to find encodings
if {[info tclversion] eq "8.4"} {
| > > > | 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 |
}
}
seek $::tclKitStorage_fd 0
set vfsHandler [list ::vfs::zip::handler $::tclKitStorage_fd]
unset ::tclKitStorage_fd
}
"cvfs" {
set vfsHandler [list ::vfs::kitdll::vfshandler tcl]
}
}
# mount the executable, i.e. make all runtime files available
vfs::filesystem mount $noe $vfsHandler
# alter path to find encodings
if {[info tclversion] eq "8.4"} {
|
| ︙ | ︙ |