From b074c2152c4a17c00d242fe7d1d42ca0b016af25 Mon Sep 17 00:00:00 2001 From: "Vladimir D. Seleznev" Date: Sat, 17 Aug 2019 20:47:13 +0300 Subject: [PATCH 3/4] ALT: tests auto_path --- tcltls/tests/all.tcl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tcltls/tests/all.tcl b/tcltls/tests/all.tcl index 4ec33b0..bc54344 100644 --- a/tcltls/tests/all.tcl +++ b/tcltls/tests/all.tcl @@ -10,7 +10,7 @@ # RCS: @(#) $Id: all.tcl,v 1.5 2000/08/15 18:45:01 hobbs Exp $ #set auto_path [linsert $auto_path 0 [file normalize [file join [file dirname [info script]] ..]]] -set auto_path [linsert $auto_path 0 [file normalize [pwd]]] +set auto_path [linsert $auto_path 0 [file normalize $::env(AUTO_PATH)]] if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest -- 2.25.3