From 4b38832d96e0629267b708816d38a16b73761546 Mon Sep 17 00:00:00 2001
From: Christopher Baines <mail@cbaines.net>
Date: Thu, 10 Jun 2021 00:11:23 +0100
Subject: Fix the thread-start-delay time calculation

To actually use max-parallel-builds.
---
 guix-build-coordinator/agent.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/guix-build-coordinator/agent.scm b/guix-build-coordinator/agent.scm
index dc44251..6d5a395 100644
--- a/guix-build-coordinator/agent.scm
+++ b/guix-build-coordinator/agent.scm
@@ -318,8 +318,8 @@
                                     (make-time time-duration
                                                0
                                                (max 5
-                                                    (- 106(* 100
-                                                             (/ 120 64))))))))
+                                                    (- 105 (* 100
+                                                              (/ max-parallel-builds 64))))))))
     (define (display-info)
       (display
        (simple-format
-- 
cgit v1.2.3