aboutsummaryrefslogtreecommitdiff
path: root/guix-build-coordinator/hooks.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix-build-coordinator/hooks.scm')
-rw-r--r--guix-build-coordinator/hooks.scm3
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