diff options
| author | Christopher Baines <mail@cbaines.net> | 2020-06-19 21:36:42 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2020-06-19 21:36:42 +0100 |
| commit | 61f9e2b74c721dd980c8e00c5b5fcd682106e574 (patch) | |
| tree | aa114e9d4d97e5b50a1534f00ac6f01d1389cf00 | |
| parent | cff4afaa61ecb1f25d05b0d0982bc49bc756a128 (diff) | |
| download | build-coordinator-61f9e2b74c721dd980c8e00c5b5fcd682106e574.tar build-coordinator-61f9e2b74c721dd980c8e00c5b5fcd682106e574.tar.gz | |
Don't consider allocated builds when planning
As it makes the plan harder to read, given it contains builds which are
underway.
| -rw-r--r-- | guix-build-coordinator/datastore/sqlite.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/guix-build-coordinator/datastore/sqlite.scm b/guix-build-coordinator/datastore/sqlite.scm index 16a89da..159124c 100644 --- a/guix-build-coordinator/datastore/sqlite.scm +++ b/guix-build-coordinator/datastore/sqlite.scm @@ -1051,6 +1051,8 @@ EXCEPT ON builds.derivation_name = derivation_outputs.derivation_name WHERE build_results.result = 'success' ) +EXCEPT + SELECT build_id FROM allocated_builds "))) (let ((builds (sqlite-map (match-lambda |