summaryrefslogtreecommitdiffstats
path: root/tests/winfo.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/winfo.test')
-rw-r--r--tests/winfo.test12
1 files changed, 9 insertions, 3 deletions
diff --git a/tests/winfo.test b/tests/winfo.test
index 5d7292f..7f5fe9e 100644
--- a/tests/winfo.test
+++ b/tests/winfo.test
@@ -206,9 +206,15 @@ test winfo-7.6 {"winfo pathname" command} {
test winfo-7.7 {"winfo pathname" command} {
winfo pathname -displayof .b [winfo id .]
} {.}
-test winfo-7.8 {"winfo pathname" command} {unixOnly} {
- winfo pathname [testwrapper .]
-} {}
+
+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."
+
+ test winfo-7.8 {"winfo pathname" command} {unixOnly} {
+ winfo pathname [testwrapper .]
+ } {}
+}
test winfo-8.1 {"winfo pointerx" command} {
catch [winfo pointerx .b]