diff options
| author | Christopher Baines <mail@cbaines.net> | 2020-04-17 11:45:59 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2020-04-17 11:45:59 +0100 |
| commit | 64783d00e885412b1b6a8c5e640863b4836a103b (patch) | |
| tree | ce77a2147fbc4a93339d0565fe7bb41e6b8f6d24 /guix-build-coordinator | |
| parent | f8af65fbc16325ab59df800c91a8ca951c8abb81 (diff) | |
| download | build-coordinator-64783d00e885412b1b6a8c5e640863b4836a103b.tar build-coordinator-64783d00e885412b1b6a8c5e640863b4836a103b.tar.gz | |
Only sleep in the agent when there are no builds
The last time the agent checked.
Diffstat (limited to 'guix-build-coordinator')
| -rw-r--r-- | guix-build-coordinator/agent.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/guix-build-coordinator/agent.scm b/guix-build-coordinator/agent.scm index 4e4a991..a528143 100644 --- a/guix-build-coordinator/agent.scm +++ b/guix-build-coordinator/agent.scm @@ -58,9 +58,10 @@ (report-setup-failure coordinator-uri uuid password (assoc-ref build "uuid") pre-build-status)))))) - builds)) + builds) - (sleep 5))) + (when (null? builds) + (sleep 5))))) (define (pre-build-process derivation-name) (define (find-missing-inputs inputs) |