blob: fa3c40ef1f6ee982c6112efc8e9e6606d0a70d55 (
plain)
1
2
3
4
5
6
7
8
9
|
proc ::TreeCtrlLoad {dir} {
uplevel #0 source [list [file join $dir treectrl.tcl]]
uplevel #0 source [list [file join $dir filelist-bindings.tcl]]
tclPkgSetup $dir treectrl @VERSION@ {
{@treectrl_LIB_FILE@ load {treectrl imagetint textlayout}}
}
}
package ifneeded treectrl @VERSION@ [list ::TreeCtrlLoad $dir]
|