15 lines
535 B
Tcl
15 lines
535 B
Tcl
# Index file to load the TDBC MySQL package.
|
|
|
|
if {![package vsatisfies [package provide Tcl] 8.6-]} {
|
|
return
|
|
}
|
|
if {[package vsatisfies [package provide Tcl] 9.0-]} {
|
|
package ifneeded tdbc::mysql 1.1.5 \
|
|
"[list source [file join $dir tdbcmysql.tcl]]\;\
|
|
[list load [file join $dir tcl9tdbcmysql115t.dll] [string totitle tdbcmysql]]"
|
|
} else {
|
|
package ifneeded tdbc::mysql 1.1.5 \
|
|
"[list source [file join $dir tdbcmysql.tcl]]\;\
|
|
[list load [file join $dir tdbcmysql115t.dll] [string totitle tdbcmysql]]"
|
|
}
|