diff --git a/tribes/deploy/local-control.scm b/tribes/deploy/local-control.scm index 113357e..65e3ed4 100644 --- a/tribes/deploy/local-control.scm +++ b/tribes/deploy/local-control.scm @@ -547,7 +547,6 @@ status-file generations-file))) (run-server - 'http (lambda (request body) (handle-request runtime host-config-file @@ -558,6 +557,7 @@ status-file request body)) + 'http #:socket (make-control-socket control-directory control-socket-file control-group-name))))