Overview
| Comment: | Fixed issue with locating main.tcl on KitDLLs |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
b6937cc4c5ce90707a349dcac4464754 |
| User & Date: | rkeene on 2015-05-29 17:08:48 |
| Other Links: | manifest | tags |
Context
|
2015-08-05
| ||
| 03:27 | Updated URL to tcllib check-in: faeac9b5b2 user: rkeene tags: trunk | |
|
2015-05-29
| ||
| 17:08 | Fixed issue with locating main.tcl on KitDLLs check-in: b6937cc4c5 user: rkeene tags: trunk | |
| 17:08 | Fixed bug where dynamictk was always applied check-in: 360c2ef691 user: rkeene tags: trunk | |
Changes
Modified kitsh/buildsrc/kitsh-0.0/kitInit.c from [de7a0cddb9] to [3cb384a768].
| ︙ | ︙ | |||
223 224 225 226 227 228 229 |
"catch {load {} registry}\n"
#endif /* _WIN32 */
"return 0\n"
"}\n"
"tclKitInit";
static const char initScript[] =
| | | | 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 |
"catch {load {} registry}\n"
#endif /* _WIN32 */
"return 0\n"
"}\n"
"tclKitInit";
static const char initScript[] =
"if {[file isfile [file join " TCLKIT_VFSSOURCE " main.tcl]]} {\n"
"if {[info commands console] != {}} { console hide }\n"
"set tcl_interactive 0\n"
"incr argc\n"
"set argv [linsert $argv 0 $argv0]\n"
"set argv0 [file join " TCLKIT_VFSSOURCE " main.tcl]\n"
"} else continue\n";
/* SetExecName --
Hack to get around Tcl bug 1224888.
*/
static void SetExecName(Tcl_Interp *interp, const char *path) {
|
| ︙ | ︙ |