From 4155426928eab2265d78f4860c35e09057dde840 Mon Sep 17 00:00:00 2001
From: "N.N." <krzyszcz@users.sourceforge.net>
Date: Mon, 13 Jun 2005 20:41:52 +0000
Subject: toxy alpha19 and pddp alpha3 (see notes.txt for toxy and pddp)

svn path=/trunk/externals/miXed/; revision=3170
---
 test/toxy/editors/bpf.wid | 2 +-
 test/toxy/setup.wid       | 9 +++++++++
 2 files changed, 10 insertions(+), 1 deletion(-)

(limited to 'test')

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
-- 
cgit v1.2.1