Use fossil options as understood by version 1.21

This commit is contained in:
Dieter Deyke 2014-07-09 19:04:35 +02:00
parent 0f6e83e318
commit 4fed5df2bd

View file

@ -344,7 +344,7 @@ seconds; the server cuts off after 10 requests in 20 seconds.")
(make-directory dir) (make-directory dir)
(pb/run-process dir "fossil" "clone" repo "repo.fossil") (pb/run-process dir "fossil" "clone" repo "repo.fossil")
(pb/run-process dir "fossil" "open" "repo.fossil"))) (pb/run-process dir "fossil" "open" "repo.fossil")))
(pb/run-process dir "fossil" "timeline" "--limit" "1" "--type" "ci" "--width" "0") (pb/run-process dir "fossil" "timeline" "-n" "1" "-t" "ci")
(or (pb/find-parse-time (or (pb/find-parse-time
"=== \\([0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\} ===\n[0-9]\\{2\\}:[0-9]\\{2\\}:[0-9]\\{2\\}\\) ") "=== \\([0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\} ===\n[0-9]\\{2\\}:[0-9]\\{2\\}:[0-9]\\{2\\}\\) ")
(error "No valid timestamps found!")))))) (error "No valid timestamps found!"))))))