(* libguestfs *)
let libguestfs_query_mins = 60
-let libguestfs_website_cvs =
- sprintf "%s/d/redhat/websites/libguestfs" (Sys.getenv "HOME")
+let libguestfs_website_repo =
+ sprintf "%s/d/websites/libguestfs" (Sys.getenv "HOME")
let libguestfs_localconfigure source =
let configure =
let website_latest_version =
let rex = Str.regexp "libguestfs-\\(.*\\)\\.tar\\.gz" in
fun branch ->
- let wdir = libguestfs_website_cvs // "download" // branch in
+ let wdir = libguestfs_website_repo // "download" // branch in
let files = Sys.readdir wdir in
let files = Array.to_list files in
if files = [] then None
if not version.is_stable then
require (website_built version);
- require (website_cvs_checked_in version);
+ require (website_checked_in version);
require (website_rsync_done version)
(* Goal: website has been rsync'd. *)
sh "
cd %s
./.rsync
- " libguestfs_website_cvs
+ " libguestfs_website_repo
-(* Goal: Tarball added to CVS and CVS checked in. *)
-and website_cvs_checked_in version =
- let key = sprintf "libguestfs_website_cvs_checked_in_%s" version.version in
+(* Goal: Tarball added to repository and checked in. *)
+and website_checked_in version =
+ let key = sprintf "libguestfs_website_checked_in_%s" version.version in
target (memory_exists key);
onrun (fun () -> memory_set key "1");
sh "
cd %s
cp %s/tarballs/%s %s
- cvs add -kb %s
- cvs ci -m \"Version %s\"
- " libguestfs_website_cvs
+ git add %s
+ git add *.txt *.html
+ git commit -m \"Version %s\"
+ " libguestfs_website_repo
buildtmp version.tarball version.urlpath
version.urlpath
version.version
(* Goal: website (local copy) has been built. *)
and website_built version =
- let index_file = sprintf "%s/index.html" libguestfs_website_cvs in
+ let index_file = sprintf "%s/index.html" libguestfs_website_repo in
target (file_contains_string index_file version.version);
require (tarball_created version);
./localconfigure
make
- make website
+ make website WEBSITEDIR=%s
" buildtmp version.tarball
version.package_version
(quote (libguestfs_localconfigure `Tarball))
(quote libguestfs_localenv)
+ (quote libguestfs_website_repo)
(* Goal: the tarball has passed the required set of tests before
* a release is allowed.