2283
2284
2285
2286
2287
2288
2289
2290
2291
2292
2293
2294
2295
2296
2297
|
variable autoLoadTcl; # DEFAULT: <automatic>
if {![info exists autoLoadTcl]} then {
#
# TODO: Better automatic detection of native Tcl installs here?
#
if {[isEagle] && \
[catch {tcl select -architecture}] == 0} then {
set autoLoadTcl true
} else {
set autoLoadTcl false
}
}
#
|
|
|
2283
2284
2285
2286
2287
2288
2289
2290
2291
2292
2293
2294
2295
2296
2297
|
variable autoLoadTcl; # DEFAULT: <automatic>
if {![info exists autoLoadTcl]} then {
#
# TODO: Better automatic detection of native Tcl installs here?
#
if {[isEagle] && \
[catch {tcl select -flags +TrustedOnly -architecture}] == 0} then {
set autoLoadTcl true
} else {
set autoLoadTcl false
}
}
#
|