diff options
Diffstat (limited to 'scripts')
| -rw-r--r-- | scripts/guix-build-coordinator-queue-builds-from-guix-data-service.in | 18 |
1 files changed, 12 insertions, 6 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 318621c..84d4acc 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 @@ -215,10 +215,13 @@ (simple-format #f "channel instance (~A): ~A: " system derivation) - #:tags `((category . channel-instance) - (revision . ,commit) + #:tags `(((key . category) + (value . channel-instance)) + ((key . revision) + (value . ,commit)) ,@(if branch - `((branch . ,branch)) + `((key . branch) + (value . ,branch)) '())))) (channel-instance-derivations-for-commit guix-data-service commit @@ -251,10 +254,13 @@ #:log-prefix (simple-format #f "package (~A=>~A): ~A: " system target derivation) - #:tags `((category . package) - (revision . ,commit) + #:tags `(((key . category) + (value . package)) + ((key . revision) + (value . ,commit)) ,@(if branch - `((branch . ,branch)) + `((key . branch) + (value . ,branch)) '()))))) unprocessed-package-derivations) (record-derivations-as-processed unprocessed-package-derivations)))) |