01/04: View scheduled builds like succeeded builds in terms of blocking

[Christopher Baines]

cbaines pushed a commit to branch master
in repository data-service.

commit b9305d81a469da0ee094f6fc87066cae5fe8f9c8
Author: Christopher Baines <mail@cbaines.net>
AuthorDate: Sat Nov 12 11:33:37 2022 +0000

    View scheduled builds like succeeded builds in terms of blocking
    
    This means that an output is viewed to not be blocking if it has a scheduled
    build, just as if it has a succeeded build. Also, scheduling builds will
    unblock blocked builds.
    
    This is helpful as it means that it reduces noise for blocking builds.
---
 guix-data-service/model/blocked-builds.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/guix-data-service/model/blocked-builds.scm 
b/guix-data-service/model/blocked-builds.scm
index 059f740..708aaba 100644
--- a/guix-data-service/model/blocked-builds.scm
+++ b/guix-data-service/model/blocked-builds.scm
@@ -125,7 +125,7 @@ WHERE NOT EXISTS (
     WHERE successful_builds.derivation_output_details_set_id =
           builds.derivation_output_details_set_id
       AND successful_builds.build_server_id = $2
-      AND successful_builds_latest_build_status.status = 'succeeded'
+      AND successful_builds_latest_build_status.status IN ('succeeded', 
'scheduled')
 )")
 
   (exec-query conn
@@ -229,7 +229,7 @@ WHERE builds.id IN ("
     INNER JOIN latest_build_status AS 
builds_for_same_output_latest_build_status
       ON builds_for_same_output.id
            = builds_for_same_output_latest_build_status.build_id
-     AND builds_for_same_output_latest_build_status.status = 'succeeded'
+     AND builds_for_same_output_latest_build_status.status IN ('succeeded', 
'scheduled')
     WHERE builds_for_same_output.derivation_output_details_set_id
             = builds.derivation_output_details_set_id
 )"))