Group :: Development/Tcl
RPM: tcl-tls
Main Changelog Spec Patches Sources Download Gear Bugs and FR Repocop
Patch: 0003-ALT-tests-auto_path.patch
Download
Download
From b074c2152c4a17c00d242fe7d1d42ca0b016af25 Mon Sep 17 00:00:00 2001
From: "Vladimir D. Seleznev" <vseleznv@altlinux.org>
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