我想从tcl文件启动fossil

Question

您好，我想使用tcl文件启动fossil。我一直试图在tcl文件中使用exec来运行像fossil clone这样的fossil设置代码，但它没有运行。

有没有人可以帮助我从tcl文件中运行fossil。因此，当我运行该文件时，会创建一个fossil文件夹，并使用指定的存储库进行克隆。

Answer 1

将fossil作为子进程运行的主要棘手之处在于，它有时喜欢与终端对话。处理这个问题的最简单方法是创建一个小的包装器过程来隐藏魔力：

set FOSSIL_PATH /path/to/fossil.exe

proc fossil args {
    global FOSSIL_PATH
    exec $FOSSIL_PATH {*}$args <@stdin 2>@stderr
}

然后你的代码可以这样做：

fossil clone $repo repo.fossil
file mkdir repo
cd repo
fossil open ../repo.fossil

(或者至少当我在合适的目录中使用fossil status进行测试时，它看起来对我是有效的。)