1 files changed, 19 insertions, 0 deletions
diff --git a/itcl/iwidgets/tests/all b/itcl/iwidgets/tests/all
new file mode 100644
index 00000000000..8581c5a70b0
--- /dev/null
+++ b/itcl/iwidgets/tests/all
@@ -0,0 +1,19 @@
+# This file contains a top-level script to run all of the Tcl
+# tests.  Execute it by invoking "source all" when running tclTest
+# in this directory.
+#
+# @(#) all 1.2 94/08/10 15:52:50
+# ------------------------------------------------------------------
+# THIS SCRIPT IS NOW DEPRECATED!  It is kept for older Tcl
+# installations that don't have the "tcltest" package.
+# Instead, use the "all.tcl" script to run the test suite.
+# ------------------------------------------------------------------
+
+foreach i [lsort [glob *.test]] {
+    if [string match l.*.test $i] {
+	# This is an SCCS lock file;  ignore it.
+	continue
+    }
+    puts stdout $i
+    source $i
+}