(* General. *)
let buildtmp = sprintf "%s/tmp/builds" (Sys.getenv "HOME")
+(* Fedora *)
+let fedora_dir = Sys.getenv "HOME" // "d/fedora"
+let fedora_repo pkg branch = fedora_dir // pkg // branch
+let fedora_specfile pkg branch =
+ sprintf "%s/%s.spec" (fedora_repo pkg branch) pkg
+
(* libguestfs *)
let libguestfs_query_mins = 60