diff options
author | Christopher Baines <mail@cbaines.net> | 2021-01-16 19:16:13 +0000 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2021-01-16 19:16:13 +0000 |
commit | 7b34a18f4e1bb2ddbd72ccd465294acc6b3d1ab2 (patch) | |
tree | d01cfd793b02cdf500478597cad625cfcafaa2c5 /guix-build-coordinator/agent.scm | |
parent | ffb441e0c8eb687585b5a93fce0e8ad73bae1c6d (diff) | |
download | build-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.scm | 3 |
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: " |