46 lines
1.5 KiB
Diff
46 lines
1.5 KiB
Diff
From 00f8160e2d52e8df57744c3b02ddda3f8a65d149 Mon Sep 17 00:00:00 2001
|
|
From: "jan.nijtmans" <nijtmans@users.sourceforge.net>
|
|
Date: Sat, 24 Nov 2018 14:59:04 +0000
|
|
Subject: [PATCH] If a pkgIndex file is encountered which produces an error,
|
|
continue. This shoud fix the Travis build for 9.0 (But same fix should be in
|
|
8.7 as well)
|
|
|
|
---
|
|
library/package.tcl | 9 ++++++---
|
|
1 file changed, 6 insertions(+), 3 deletions(-)
|
|
|
|
diff --git a/library/package.tcl b/library/package.tcl
|
|
index c72fbfbbe41..974cbf07956 100644
|
|
--- a/library/package.tcl
|
|
+++ b/library/package.tcl
|
|
@@ -493,7 +493,8 @@ proc tclPkgUnknown {name args} {
|
|
# $file was not readable; silently ignore
|
|
continue
|
|
} on error msg {
|
|
- tclLog "error reading package index file $file: $msg"
|
|
+ # $file is not usable; silently ignore
|
|
+ continue
|
|
} on ok {} {
|
|
set procdDirs($dir) 1
|
|
}
|
|
@@ -511,7 +512,8 @@ proc tclPkgUnknown {name args} {
|
|
# $file was not readable; silently ignore
|
|
continue
|
|
} on error msg {
|
|
- tclLog "error reading package index file $file: $msg"
|
|
+ # $file is not usable; silently ignore
|
|
+ continue
|
|
} on ok {} {
|
|
set procdDirs($dir) 1
|
|
}
|
|
@@ -595,7 +597,8 @@ proc tcl::MacOSXPkgUnknown {original name args} {
|
|
# $file was not readable; silently ignore
|
|
continue
|
|
} on error msg {
|
|
- tclLog "error reading package index file $file: $msg"
|
|
+ # $file is not usable; silently ignore
|
|
+ continue
|
|
} on ok {} {
|
|
set procdDirs($dir) 1
|
|
}
|