Fix the get-derived-priority query

It was just broken before.

1 files changed, 4 insertions, 6 deletions

diff --git a/guix-build-coordinator/datastore/sqlite.scm b/guix-build-coordinator/datastore/sqlite.scm
index 686da99..c78b202 100644
--- a/guix-build-coordinator/datastore/sqlite.scm
+++ b/guix-build-coordinator/datastore/sqlite.scm
@@ -3608,22 +3608,20 @@ RETURNING id"
             db
             "
 SELECT max(dependent_unprocessed_builds_with_derived_priorities.derived_priority)
-FROM unprocessed_builds_with_derived_priorities
-INNER JOIN builds
-  ON builds.id = unprocessed_builds_with_derived_priorities.build_id
+FROM builds
 INNER JOIN derivation_outputs
-  ON builds.derivation_id =
-     derivation_outputs.derivation_id
+  ON builds.derivation_id = derivation_outputs.derivation_id
 INNER JOIN derivation_outputs AS all_derivation_outputs
   ON all_derivation_outputs.output_id = derivation_outputs.output_id
 INNER JOIN derivation_inputs
   ON derivation_inputs.derivation_output_id = all_derivation_outputs.id
 INNER JOIN builds AS dependent_builds
   ON dependent_builds.processed = 0
+ AND dependent_builds.canceled = 0
  AND dependent_builds.derivation_id = derivation_inputs.derivation_id
 INNER JOIN unprocessed_builds_with_derived_priorities AS dependent_unprocessed_builds_with_derived_priorities
   ON dependent_builds.id = dependent_unprocessed_builds_with_derived_priorities.build_id
-WHERE unprocessed_builds_with_derived_priorities.build_id = :build_id"
+WHERE builds.id = :build_id"
             #:cache? #t)))
 
       (sqlite-bind-arguments