12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
# This is used as a Tcl Module. Use it like this:
# ::tcl::tm::path add <path-to-dir-with-module>
# package require pstools
# namespace import pstools::*
#----------------------------------------------------------------------
package provide pstools 1.0
package require Tcl 8.4
namespace eval pstools {
namespace export safeLoad commonYScroll locateTmp locateEditor
if {[info commands ::ttk::*] ne ""} {
catch {namespace path ::ttk}
}
|
|
|
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
# This is used as a Tcl Module. Use it like this:
# ::tcl::tm::path add <path-to-dir-with-module>
# package require pstools
# namespace import pstools::*
#----------------------------------------------------------------------
package provide pstools 1.0
#package require Tcl 8.4
namespace eval pstools {
namespace export safeLoad commonYScroll locateTmp locateEditor
if {[info commands ::ttk::*] ne ""} {
catch {namespace path ::ttk}
}
|