contains_substring "Name or service not known" in
let completed_successfully = contains_substring "completed successfully" in
let failed = contains_substring "FAILED" in
- fun ?(wait = true) pkg branch ->
+ fun ?(wait = true) ?side_tag pkg branch ->
let repodir = fedora_repo pkg branch in
let out =
shout "
cd %s
- fedpkg build%s 2>&1
- " repodir (if not wait then " --nowait" else "")
+ fedpkg build%s%s 2>&1
+ " repodir
+ (if not wait then " --nowait" else "")
+ (match side_tag with None -> "" | Some t -> " --target " ^ t)
in
if not wait then (
(* Just check the task was created. *)