aboutsummaryrefslogtreecommitdiff
path: root/guix-build-coordinator/agent-messaging/http.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix-build-coordinator/agent-messaging/http.scm')
-rw-r--r--guix-build-coordinator/agent-messaging/http.scm4
1 files changed, 3 insertions, 1 deletions
diff --git a/guix-build-coordinator/agent-messaging/http.scm b/guix-build-coordinator/agent-messaging/http.scm
index 27e2419..1f2df0a 100644
--- a/guix-build-coordinator/agent-messaging/http.scm
+++ b/guix-build-coordinator/agent-messaging/http.scm
@@ -85,7 +85,9 @@
(string-drop agent-path 1))))))
(define (with-request-mutex thunk)
- (monitor (thunk)))
+ (if (running-on-the-hurd?)
+ (thunk)
+ (monitor (thunk))))
(define (default-log level . components)
(apply log-msg level components))