diff options
| author | hershey <hershey> | 1998-08-12 16:08:37 (GMT) |
|---|---|---|
| committer | hershey <hershey> | 1998-08-12 16:08:37 (GMT) |
| commit | a7263c7d2a1a06ab935e508f700e01ee3e61b6b9 (patch) | |
| tree | 1f0772c971217a000ba3a87116c1ee780d8fab8d /tests | |
| parent | 109f411118f69594208f2f464d71d9b62a384258 (diff) | |
| download | tk-a7263c7d2a1a06ab935e508f700e01ee3e61b6b9.zip tk-a7263c7d2a1a06ab935e508f700e01ee3e61b6b9.tar.gz tk-a7263c7d2a1a06ab935e508f700e01ee3e61b6b9.tar.bz2 | |
skips tests that require tktest executable
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/unixEmbed.test | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/unixEmbed.test b/tests/unixEmbed.test index ef8ecb9..ee7baa6 100644 --- a/tests/unixEmbed.test +++ b/tests/unixEmbed.test @@ -96,6 +96,13 @@ test unixEmbed-1.4 {TkpUseWindow procedure, inheriting colormap} { destroy .t set result } {1} + +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 unixEmbed-1.5 {TkpUseWindow procedure, creating Container records} { eval destroy [winfo child .] frame .f1 -container 1 -width 200 -height 50 |