1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
if {![package vsatisfies [package provide Tcl] 8.5 9]} {
# FRINK: nocheck
return
}
package ifneeded textutil 0.9 [list source [file join $dir textutil.tcl]]
package ifneeded textutil::adjust 0.7.3 [list source [file join $dir adjust.tcl]]
package ifneeded textutil::split 0.8 [list source [file join $dir split.tcl]]
package ifneeded textutil::trim 0.7 [list source [file join $dir trim.tcl]]
package ifneeded textutil::tabify 0.7 [list source [file join $dir tabify.tcl]]
package ifneeded textutil::repeat 0.7 [list source [file join $dir repeat.tcl]]
package ifneeded textutil::string 0.8 [list source [file join $dir string.tcl]]
package ifneeded textutil::expander 1.3.1 [list source [file join $dir expander.tcl]]
package ifneeded textutil::wcswidth 35.0 [list source [file join $dir wcswidth.tcl]]
if {![package vsatisfies [package provide Tcl] 8.5]} { return }
package ifneeded textutil::patch 0.1 [list source [file join $dir patch.tcl]]
|
