* tests/defs: Changed so auto_path is set to only contain the Tcl

library directory.  This keeps the tests from accidentally picking
up stuff in installed packages.

1 files changed, 6 insertions, 1 deletions

diff --git a/tests/defs b/tests/defs
index a86b2bc..5b3783d 100644
--- a/tests/defs
+++ b/tests/defs
@@ -9,7 +9,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 #
-# RCS: @(#) $Id: defs,v 1.1.2.3 1998/12/02 21:46:04 stanton Exp $
+# RCS: @(#) $Id: defs,v 1.1.2.4 1998/12/03 23:58:52 stanton Exp $
 
 if ![info exists VERBOSE] {
     set VERBOSE 0
@@ -18,6 +18,11 @@ if ![info exists TESTS] {
     set TESTS {}
 }
 
+# Ensure that we have a minimal auto_path so we don't pick up extra
+#  junk.
+
+set auto_path [list [info library]]
+
 # If there is no "memory" command (because memory debugging isn't
 # enabled), generate a dummy command that does nothing.