diff options
Diffstat (limited to 'Master/tlpkg/tltcl/lib/tk8.6/pkgIndex.tcl')
-rw-r--r-- | Master/tlpkg/tltcl/lib/tk8.6/pkgIndex.tcl | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/Master/tlpkg/tltcl/lib/tk8.6/pkgIndex.tcl b/Master/tlpkg/tltcl/lib/tk8.6/pkgIndex.tcl new file mode 100644 index 00000000000..fcabf1128d9 --- /dev/null +++ b/Master/tlpkg/tltcl/lib/tk8.6/pkgIndex.tcl @@ -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.10 [list load [file normalize [file join $dir .. .. bin libtk8.6.dll]] Tk] +} else { + package ifneeded Tk 8.6.10 [list load [file normalize [file join $dir .. .. bin tk86.dll]] Tk] +} |