diff options
Diffstat (limited to 'guix-build-coordinator/agent.scm')
-rw-r--r-- | guix-build-coordinator/agent.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/guix-build-coordinator/agent.scm b/guix-build-coordinator/agent.scm index f80cb10..f7a41b8 100644 --- a/guix-build-coordinator/agent.scm +++ b/guix-build-coordinator/agent.scm @@ -46,7 +46,7 @@ derivation-substitute-urls non-derivation-substitute-urls metrics-file - max-5min-load-average) + max-1min-load-average) (define lgr (make <logger>)) (define port-log (make <port-log> #:port (current-output-port) @@ -93,7 +93,7 @@ (define (wait-for-low-load build-id) (let ((current-load (get-load-average))) - (when (>= current-load max-5min-load-average) + (when (>= current-load max-1min-load-average) (log-msg lgr 'INFO build-id ": holding build start due to high load") |