diff options
| -rw-r--r-- | guix-build-coordinator/hooks.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/guix-build-coordinator/hooks.scm b/guix-build-coordinator/hooks.scm index 3fe16ea..b636fd6 100644 --- a/guix-build-coordinator/hooks.scm +++ b/guix-build-coordinator/hooks.scm @@ -310,7 +310,8 @@ (@ (zstd) call-with-zstd-output-port)) ('none (lambda (port proc) - (proc port)))))) + (proc port) + (close-port port)))))) (when (file-exists? temporary-destination) (delete-file temporary-destination)) (apply |