From c6d2ead0c896565c09093d8f7eda591a3ffb1d75 Mon Sep 17 00:00:00 2001
From: hershey <hershey>
Date: Wed, 12 Aug 1998 15:35:16 +0000
Subject:  returns if testwrapper is not defined

---
 tests/id.test | 6 ++++++
 1 file changed, 6 insertions(+)

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
 }
-- 
cgit v0.12