Add files via upload
This commit is contained in:
7
windowsAgent/dist/tk/pkgIndex.tcl
vendored
Normal file
7
windowsAgent/dist/tk/pkgIndex.tcl
vendored
Normal file
@ -0,0 +1,7 @@
|
||||
if {[catch {package present Tcl 8.6.0}]} { return }
|
||||
if {($::tcl_platform(platform) eq "unix") && ([info exists ::env(DISPLAY)]
|
||||
|| ([info exists ::argv] && ("-display" in $::argv)))} {
|
||||
package ifneeded Tk 8.6.9 [list load [file join $dir .. .. bin libtk8.6.dll] Tk]
|
||||
} else {
|
||||
package ifneeded Tk 8.6.9 [list load [file join $dir .. .. bin tk86t.dll] Tk]
|
||||
}
|
Reference in New Issue
Block a user