You can now do:
./libguestfs_upstream commit [branch] <commit>
./libguestfs_upstream release <version>
let version = git_latest_version "master" in
require (website_updated version)
)
+
+(* Allow these jobs to run from the command line. *)
+let () =
+ publish "commit" (
+ function
+ | [commit] -> require (commit_tested "master" commit)
+ | [branch; commit] -> require (commit_tested branch commit)
+ | _ ->
+ failwith "use './libguestfs_upstream commit [<branch>] <commit>'"
+ );
+ publish "release" (
+ function
+ | [version] -> require (website_updated (vernames version))
+ | _ ->
+ failwith "use './libguestfs_upstream release <version>'"
+ )