diff options
author | Christopher Baines <mail@cbaines.net> | 2020-09-27 15:20:57 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2020-09-27 15:20:57 +0100 |
commit | 44bb44556cc776fc4e26c1b8b2ccf69c9e80a5fc (patch) | |
tree | 3693f30b6e2d2aea6bfbd4dc3a03a78c65ee7ffe /scripts | |
parent | ede295385fca2c54637600c4137ee1d74abd8532 (diff) | |
download | build-coordinator-44bb44556cc776fc4e26c1b8b2ccf69c9e80a5fc.tar build-coordinator-44bb44556cc776fc4e26c1b8b2ccf69c9e80a5fc.tar.gz |
Skip duplicate channel instance derivation requests
Diffstat (limited to 'scripts')
-rw-r--r-- | scripts/guix-build-coordinator-queue-builds-from-guix-data-service.in | 17 |
1 files changed, 9 insertions, 8 deletions
diff --git a/scripts/guix-build-coordinator-queue-builds-from-guix-data-service.in b/scripts/guix-build-coordinator-queue-builds-from-guix-data-service.in index a8f1ab4..0bf3a1d 100644 --- a/scripts/guix-build-coordinator-queue-builds-from-guix-data-service.in +++ b/scripts/guix-build-coordinator-queue-builds-from-guix-data-service.in @@ -155,14 +155,15 @@ (for-each (match-lambda ((system . target) - (for-each (lambda (derivation) - (submit-build coordinator - guix-data-service - derivation - #:priority 1000)) - (channel-instance-derivations-for-commit guix-data-service - commit - system)) + (when (string=? target "none") + (for-each (lambda (derivation) + (submit-build coordinator + guix-data-service + derivation + #:priority 1000)) + (channel-instance-derivations-for-commit guix-data-service + commit + system))) (let ((unprocessed-package-derivations (filter (lambda (derivation) |