diff options
author | hershey <hershey> | 1998-08-12 16:08:58 (GMT) |
---|---|---|
committer | hershey <hershey> | 1998-08-12 16:08:58 (GMT) |
commit | 14ae604f53197524a4fb176d16d9fad3dd23221a (patch) | |
tree | b2c3c6ae1cf23fa7fa007866ae181613ccc93458 /tests/unixWm.test | |
parent | a7263c7d2a1a06ab935e508f700e01ee3e61b6b9 (diff) | |
download | tk-14ae604f53197524a4fb176d16d9fad3dd23221a.zip tk-14ae604f53197524a4fb176d16d9fad3dd23221a.tar.gz tk-14ae604f53197524a4fb176d16d9fad3dd23221a.tar.bz2 |
skips tests that require tktest executable
Diffstat (limited to 'tests/unixWm.test')
-rw-r--r-- | tests/unixWm.test | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/unixWm.test b/tests/unixWm.test index b165826..dc5ed49 100644 --- a/tests/unixWm.test +++ b/tests/unixWm.test @@ -352,6 +352,12 @@ test unixWm-8.9 {icon windows} {nonPortable} { lappend result [winfo ismapped .icon] [wm state .icon] } {icon 1 0 0 withdrawn 1 normal} +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 +} + test unixWm-9.1 {TkWmMapWindow procedure, client property} {unixOnly} { catch {destroy .t} toplevel .t -width 100 -height 50 |