diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/toxy/editors/bpf.wid | 2 | ||||
| -rw-r--r-- | test/toxy/setup.wid | 9 |
2 files changed, 10 insertions, 1 deletions
diff --git a/test/toxy/editors/bpf.wid b/test/toxy/editors/bpf.wid index 1b30646..6fa7f45 100644 --- a/test/toxy/editors/bpf.wid +++ b/test/toxy/editors/bpf.wid @@ -1,4 +1,4 @@ -catch {console show} +::toxy::console show ::toxy::package_require BLT "e:/Tcl/bin/BLT24.dll" namespace eval ::toxy::bpf {} diff --git a/test/toxy/setup.wid b/test/toxy/setup.wid index 05e0164..0794ce8 100644 --- a/test/toxy/setup.wid +++ b/test/toxy/setup.wid @@ -19,6 +19,15 @@ proc ::toxy::package_require {pkg dll} { } } +# valid options: "show", "hide" +proc ::toxy::console {op} { + if {[catch {::console $op}]} { + if {[catch {package require tkcon}] == 0} { + tkcon $op + } + } +} + # FIXME this should be explicitly requested # In order to keep the state after tk canvas has been destroyed # try setting -variable and -textvariable traces |