1 Star 0 Fork 21

BridgeNorth/tcl

forked from src-openEuler/tcl 
加入 Gitee
与超过 1200万 开发者一起发现、参与优秀开源项目,私有仓库也完全免费 :)
免费加入
文件
该仓库未声明开源许可证文件(LICENSE),使用请关注具体项目描述及其代码上游依赖。
克隆/下载
File-not-found-should-be-ignored-silently.patch 1.47 KB
一键复制 编辑 原始数据 按行查看 历史
sigui 提交于 2020-10-27 17:48 . File not found should be ignored silently
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
}
Loading...
马建仓 AI 助手
尝试更多
代码解读
代码找茬
代码优化
1
https://gitee.com/run-is-pig/tcl.git
git@gitee.com:run-is-pig/tcl.git
run-is-pig
tcl
tcl
master

搜索帮助