aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix-build-coordinator/agent.scm2
-rw-r--r--scripts/guix-build-coordinator-agent.in2
2 files changed, 2 insertions, 2 deletions
diff --git a/guix-build-coordinator/agent.scm b/guix-build-coordinator/agent.scm
index f7a41b8..76be5bd 100644
--- a/guix-build-coordinator/agent.scm
+++ b/guix-build-coordinator/agent.scm
@@ -92,7 +92,7 @@
metrics-file)))
(define (wait-for-low-load build-id)
- (let ((current-load (get-load-average)))
+ (let ((current-load (get-load-average #:period 1)))
(when (>= current-load max-1min-load-average)
(log-msg lgr 'INFO
build-id
diff --git a/scripts/guix-build-coordinator-agent.in b/scripts/guix-build-coordinator-agent.in
index 4d0666d..7be261f 100644
--- a/scripts/guix-build-coordinator-agent.in
+++ b/scripts/guix-build-coordinator-agent.in
@@ -96,7 +96,7 @@
(systems . (,guix-config:%system))
(metrics-file
. "/var/lib/prometheus/node-exporter/guix-build-coordinator-agent.prom")
- (max-5min-load-average
+ (max-1min-load-average
. ,(get-available-processing-units))))
(define (parse-options options defaults args)