mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2026-04-06 21:20:33 +02:00
utils: Make sure `substitute' writes all its output.
* guix/build/utils.scm (substitute): Close OUT before renaming it.
This commit is contained in:
@@ -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))))))
|
||||
|
||||
Reference in New Issue
Block a user