From 0c0f30f0a4146c4e548cd9843d26b0bc02cb5024 Mon Sep 17 00:00:00 2001
From: Christopher Baines <mail@cbaines.net>
Date: Fri, 21 May 2021 19:50:07 +0100
Subject: Drop the request mutex for most requests

Just use it when uploading files.
---
 guix-build-coordinator/agent-messaging/http.scm | 16 +++++++---------
 1 file changed, 7 insertions(+), 9 deletions(-)

diff --git a/guix-build-coordinator/agent-messaging/http.scm b/guix-build-coordinator/agent-messaging/http.scm
index 06c3495..6ff2e6a 100644
--- a/guix-build-coordinator/agent-messaging/http.scm
+++ b/guix-build-coordinator/agent-messaging/http.scm
@@ -136,15 +136,13 @@
 
   (define (make-request)
     (let-values (((response body)
-                  (with-request-mutex
-                   (lambda ()
-                     (http-request uri
-                                   #:method method
-                                   #:body (scm->json-string body)
-                                   #:decode-body? #f
-                                   #:headers
-                                   `((Authorization . ,auth-value)
-                                     ,@headers))))))
+                  (http-request uri
+                                #:method method
+                                #:body (scm->json-string body)
+                                #:decode-body? #f
+                                #:headers
+                                `((Authorization . ,auth-value)
+                                  ,@headers))))
       (let ((code (response-code response)))
         (cond
          ((eq? code 400)
-- 
cgit v1.2.3