~ruther/guix-local: utils: Make sure `substitute' writes all its output.

8e6ecb14006a96ef6620005223597d6bf4e8ebdf — Ludovic Courtès 13 years ago 1a7d8e2

utils: Make sure `substitute' writes all its output.

* guix/build/utils.scm (substitute): Close OUT before renaming it.

patch browse .tar.gz

1 files changed, 1 insertions(+), 0 deletions(-)

M guix/build/utils.scm

M guix/build/utils.scm => guix/build/utils.scm +1 -0

@@ 170,6 170,7 @@ MATCH OUTPUT-PORT)."
                            (display line out)
                            (newline out)))
                     (loop (read-line in)))))))
+        (close out)
         (rename-file template file))
       (lambda (key . args)
         (false-if-exception (delete-file template))))))