如何使用Fake构建Docker映像

Question

是否有使用Fake构建Docker映像的简单明了的方法？我正在看Fake网站上的API Doc，但没有看到与Docker相关的任何内容。我可以为docker包装命令行界面，但是如果不需要的话，我不想重新发明轮子。

Answer 1

我最终只是走了调用命令行的路线

Target "BuildDocker" (fun _ ->
trace "Building Docker Image"

let result =
    ExecProcess (fun info ->
        info.FileName <- ("Docker.exe")
        info.Arguments <- ("build -t \"docker/api:develop\" ." )
        info.WorkingDirectory <- (dockerDir @@ "/api") 
    ) (System.TimeSpan.FromMinutes 5.)

if result <> 0 then failwith "Failed result from Docker"
)