diff options
-rw-r--r-- | tests/id.test | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/id.test b/tests/id.test index 2589d48..31249da 100644 --- a/tests/id.test +++ b/tests/id.test @@ -13,6 +13,12 @@ if {[info procs test] != "test"} { source defs } +if {[string compare testwrapper [info commands testwrapper]] != 0} { + puts "This application hasn't been compiled with the testwrapper command," + puts "therefore I am skipping all of these tests." + return +} + foreach i [winfo children .] { destroy $i } |