aboutsummaryrefslogtreecommitdiff
path: root/guix-build-coordinator/agent-messaging
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2020-04-27 17:00:21 +0100
committerChristopher Baines <mail@cbaines.net>2020-04-27 17:00:21 +0100
commit077bf8bc2508bc4b219c6824f541ee5c373da661 (patch)
tree4593ade1ec59ea4b54b0a229f216d7bcdb4551e0 /guix-build-coordinator/agent-messaging
parent63b0fa9c37a5cd540bcbb975598baa8ef1a3831b (diff)
downloadbuild-coordinator-077bf8bc2508bc4b219c6824f541ee5c373da661.tar
build-coordinator-077bf8bc2508bc4b219c6824f541ee5c373da661.tar.gz
Revert "Switch to the non-fibers web server"
The non-fibers one processes requests sequentially, which just won't do. This reverts commit 2d2ae5b6b01081f35ad2fc25affdef8c876b48e6.
Diffstat (limited to 'guix-build-coordinator/agent-messaging')
-rw-r--r--guix-build-coordinator/agent-messaging/http.scm7
1 files changed, 3 insertions, 4 deletions
diff --git a/guix-build-coordinator/agent-messaging/http.scm b/guix-build-coordinator/agent-messaging/http.scm
index a47c60d..19f0fdd 100644
--- a/guix-build-coordinator/agent-messaging/http.scm
+++ b/guix-build-coordinator/agent-messaging/http.scm
@@ -26,7 +26,7 @@
#:use-module (ice-9 textual-ports)
#:use-module (ice-9 binary-ports)
#:use-module (system repl error-handling)
- #:use-module (web server)
+ #:use-module (fibers web server)
#:use-module (rnrs bytevectors)
#:use-module (json)
#:use-module (web http)
@@ -100,9 +100,8 @@ if there was no request body."
datastore
trigger-build-allocation
hook-channel)))
- 'fibers
- (list #:host host
- #:port port)))
+ #:host host
+ #:port port))
#:on-error 'backtrace
#:post-error (lambda (key . args)
(when (eq? key 'system-error)