diff options
Diffstat (limited to 'guix-build-coordinator/coordinator.scm')
| -rw-r--r-- | guix-build-coordinator/coordinator.scm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/guix-build-coordinator/coordinator.scm b/guix-build-coordinator/coordinator.scm index 2ceac56..bfbea73 100644 --- a/guix-build-coordinator/coordinator.scm +++ b/guix-build-coordinator/coordinator.scm @@ -330,6 +330,13 @@ (build-coordinator-metrics-registry build-coordinator) "guixbuildcoordinator_coordinator_fetch_builds_duration_seconds" (lambda () + (let ((update-made (datastore-update-agent-requested-systems + (build-coordinator-datastore build-coordinator) + agent + systems))) + (when update-made + (trigger-build-allocation build-coordinator))) + (datastore-allocate-builds-to-agent (build-coordinator-datastore build-coordinator) agent |