aboutsummaryrefslogtreecommitdiff
path: root/guix
diff options
context:
space:
mode:
Diffstat (limited to 'guix')
-rw-r--r--guix/store.scm5
1 files changed, 5 insertions, 0 deletions
diff --git a/guix/store.scm b/guix/store.scm
index bd7bb59f89..1e6119ed18 100644
--- a/guix/store.scm
+++ b/guix/store.scm
@@ -41,6 +41,7 @@
hash-algo
open-connection
+ close-connection
set-build-options
valid-path?
add-text-to-store
@@ -280,6 +281,10 @@
(process-stderr s)
s))))))))
+(define (close-connection server)
+ "Close the connection to SERVER."
+ (close (nix-server-socket server)))
+
(define current-build-output-port
;; The port where build output is sent.
(make-parameter (current-error-port)))