53
54
55
56
57
58
59
60
61
62
63
64
65
66
|
package require Tk 8.6-
catch {package require textSearch}
package require wcb
package require snit
package require tablelist_tile
package require psmenu
if {[catch {package require psballoon}]} {
# Add a dummy if it does not exist.
proc addBalloon {args} {}
} else {
namespace import -force psballoon::addBalloon
}
|
>
>
|
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
|
package require Tk 8.6-
catch {package require textSearch}
package require wcb
package require snit
package require tablelist_tile
package require psmenu
package require psdebug
namespace import ::_PsDebug::*
if {[catch {package require psballoon}]} {
# Add a dummy if it does not exist.
proc addBalloon {args} {}
} else {
namespace import -force psballoon::addBalloon
}
|
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
|
source $srcdir/dirdiff.tcl
source $srcdir/fourway.tcl
source $srcdir/help.tcl
source $srcdir/plugin.tcl
source $srcdir/printobj.tcl
source $srcdir/print.tcl
source $srcdir/rev.tcl
source $srcdir/debug.tcl
# Only load vcsvfs if vfs is present
if { ! [catch {package require vfs}]} {
source $srcdir/vcsvfs.tcl
}
}
|
<
|
221
222
223
224
225
226
227
228
229
230
231
232
233
234
|
source $srcdir/dirdiff.tcl
source $srcdir/fourway.tcl
source $srcdir/help.tcl
source $srcdir/plugin.tcl
source $srcdir/printobj.tcl
source $srcdir/print.tcl
source $srcdir/rev.tcl
# Only load vcsvfs if vfs is present
if { ! [catch {package require vfs}]} {
source $srcdir/vcsvfs.tcl
}
}
|