Rework the ensure-all-related-derivations-have-builds option

This was resulting in duplicate builds for the same output, as that's not what
it was guarding against, but I think that was my intention... Anyway this
should actually only result in builds being created for outputs that are
required.

1 files changed, 5 insertions, 5 deletions

diff --git a/guix-build-coordinator/coordinator.scm b/guix-build-coordinator/coordinator.scm
index 9fa2ca7..4a2acd4 100644
--- a/guix-build-coordinator/coordinator.scm
+++ b/guix-build-coordinator/coordinator.scm
@@ -77,14 +77,14 @@
                        requested-uuid
                        (priority 0)
                        (defer-allocation? #f)
-                       (ensure-all-related-derivations-have-builds? #f))
+                       (ensure-all-related-derivation-outputs-have-builds? #f))
   (let ((datastore (build-coordinator-datastore build-coordinator))
         (uuid (or requested-uuid (random-v4-uuid))))
     (datastore-store-derivation datastore derivation)
 
-    (when ensure-all-related-derivations-have-builds?
-      (let ((related-derivations
-             (datastore-list-related-derivations-with-no-build
+    (when ensure-all-related-derivation-outputs-have-builds?
+      (let ((derivations-lacking-builds
+             (datastore-list-related-derivations-with-no-build-for-outputs
               datastore
               (derivation-file-name derivation))))
         (for-each
@@ -99,7 +99,7 @@
                                     ;; Let the scheduler take care of
                                     ;; the prioritisation
                                     0)))
-         related-derivations)))
+         derivations-lacking-builds)))
 
     (datastore-store-build datastore
                            (derivation-file-name derivation)