aboutsummaryrefslogtreecommitdiff
path: root/guix-build-coordinator/agent.scm
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2021-01-16 19:16:13 +0000
committerChristopher Baines <mail@cbaines.net>2021-01-16 19:16:13 +0000
commit7b34a18f4e1bb2ddbd72ccd465294acc6b3d1ab2 (patch)
treed01cfd793b02cdf500478597cad625cfcafaa2c5 /guix-build-coordinator/agent.scm
parentffb441e0c8eb687585b5a93fce0e8ad73bae1c6d (diff)
downloadbuild-coordinator-7b34a18f4e1bb2ddbd72ccd465294acc6b3d1ab2.tar
build-coordinator-7b34a18f4e1bb2ddbd72ccd465294acc6b3d1ab2.tar.gz
Start migrating derivation-inputs to derivation_inputs
As I think underscores are more idiomatic in JSON.
Diffstat (limited to 'guix-build-coordinator/agent.scm')
-rw-r--r--guix-build-coordinator/agent.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/guix-build-coordinator/agent.scm b/guix-build-coordinator/agent.scm
index 683f501..8c038ab 100644
--- a/guix-build-coordinator/agent.scm
+++ b/guix-build-coordinator/agent.scm
@@ -97,7 +97,8 @@
(define (process-job build)
(let ((build-id (assoc-ref build "uuid"))
- (derivation-name (assoc-ref build "derivation-name")))
+ (derivation-name (or (assoc-ref build "derivation_name")
+ (assoc-ref build "derivation-name"))))
(log-msg lgr 'INFO
build-id
": setting up to build: "