summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authorhershey <hershey>1998-08-12 16:08:26 (GMT)
committerhershey <hershey>1998-08-12 16:08:26 (GMT)
commit109f411118f69594208f2f464d71d9b62a384258 (patch)
treeb2d76ba31aad120c6545e59bccf23162f76fa07f /tests
parentc6d2ead0c896565c09093d8f7eda591a3ffb1d75 (diff)
downloadtk-109f411118f69594208f2f464d71d9b62a384258.zip
tk-109f411118f69594208f2f464d71d9b62a384258.tar.gz
tk-109f411118f69594208f2f464d71d9b62a384258.tar.bz2
skips tests that require tktest executable
Diffstat (limited to 'tests')
-rw-r--r--tests/macEmbed.test7
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/macEmbed.test b/tests/macEmbed.test
index f912dcd..b85e01a 100644
--- a/tests/macEmbed.test
+++ b/tests/macEmbed.test
@@ -30,6 +30,13 @@ test macEmbed-1.2 {TkpUseWindow procedure, bad window identifier} {
catch {destroy .t}
list [catch {toplevel .t -use 47} msg] $msg
} {1 {The window ID 47 does not correspond to a valid Tk Window.}}
+
+if {[string compare testembed [info commands testembed]] != 0} {
+ puts "This application hasn't been compiled with the testembed command,"
+ puts "therefore I am skipping all of these tests."
+ return
+}
+
test macEmbed-1.3 {TkpUseWindow procedure, creating Container records} {
eval destroy [winfo child .]
frame .f1 -container 1 -width 200 -height 50