diff options
author | Christopher Baines <mail@cbaines.net> | 2023-06-09 11:48:27 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2023-06-09 16:11:06 +0100 |
commit | 5c9ec28cb5d248bb3e3bbe6e68d67de910e03b5b (patch) | |
tree | e8c89921a13e7c73348cf639a3b07fba0485d876 /guix-data-service/web | |
parent | 7524d23b44b7aa3db42b9d5344eefa6440467189 (diff) | |
download | data-service-5c9ec28cb5d248bb3e3bbe6e68d67de910e03b5b.tar data-service-5c9ec28cb5d248bb3e3bbe6e68d67de910e03b5b.tar.gz |
Query for outputs when build events arrive
This will keep the substitute information more up to date.
Diffstat (limited to 'guix-data-service/web')
-rw-r--r-- | guix-data-service/web/build-server/controller.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/guix-data-service/web/build-server/controller.scm b/guix-data-service/web/build-server/controller.scm index babf59d..7c31cf1 100644 --- a/guix-data-service/web/build-server/controller.scm +++ b/guix-data-service/web/build-server/controller.scm @@ -23,6 +23,7 @@ #:use-module (fibers) #:use-module (guix-data-service utils) #:use-module (guix-data-service database) + #:use-module (guix-data-service substitutes) #:use-module (guix-data-service web render) #:use-module (guix-data-service web query-parameters) #:use-module (guix-data-service jobs load-new-guix-revision) @@ -233,7 +234,10 @@ (lambda (ids) (call-via-thread-pool-channel (lambda (conn) - (handle-removing-blocking-build-entries-for-successful-builds conn ids))))) + (handle-removing-blocking-build-entries-for-successful-builds conn ids))) + + (request-query-of-build-server-substitutes build-server-id + ids))) (with-build-ids-for-status items |