libguestfs_fedora: Allow package to be in BUILDING state.

[goaljobs-goals.git] / fedora.ml

diff --git a/fedora.ml b/fedora.ml
index 7d1d70b..b40a67c 100644 (file)
--- a/fedora.ml
+++ b/fedora.ml
@@ -5,11 +5,7 @@ open Printf
 
 open Goaljobs
 
-(* Repo dir, etc. *)
-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
+open Config
 
 (* Get the current version of a package. *)
 let fedora_verrel pkg branch =
@@ -150,7 +146,6 @@ let koji_build =
     if not wait then (
       (* Just check the task was created. *)
       if not (Pcre.pmatch ~rex:created_task out) then (
-        eprintf "%s\n%!" out;
         failwith "fedpkg build: build failed to start"
       )
     ) else (
@@ -169,7 +164,6 @@ let koji_build =
         else if completed_successfully out then
           ()
         else if failed out then (
-          eprintf "%s\n%!" out;
           failwith "koji build failed"
         )
         else