~ruther/guix-local: offload: Better synchronize with remote invocation of 'guix archive --missing'.

66ef5411471e8d5f25815b9ab1f360ad56e08544 — Ludovic Courtès 12 years ago 99e17dc

offload: Better synchronize with remote invocation of 'guix archive --missing'.

* guix/scripts/offload.scm (send-files)[missing-files]: Call 'waitpid'
  after reading all of MISSING.

patch browse .tar.gz

1 files changed, 4 insertions(+), 2 deletions(-)

M guix/scripts/offload.scm

M guix/scripts/offload.scm => guix/scripts/offload.scm +4 -2

@@ 443,9 443,11 @@ success, #f otherwise."
                           "-i" (build-machine-private-key machine)
                           (build-machine-name machine)
                           "guix" "archive" "--missing")
-                    (open-input-string files))))
+                    (open-input-string files)))
+                  ((result)
+                   (get-string-all missing)))
       (for-each waitpid pids)
-      (string-tokenize (get-string-all missing))))
+      (string-tokenize result)))
 
   (with-store store
     (guard (c ((nix-protocol-error? c)