diff options
| author | Christopher Baines <mail@cbaines.net> | 2020-04-26 06:42:45 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2020-04-26 06:42:45 +0100 |
| commit | cea8a56d7ba909a6b15f2a8de3f80e5eb66575d0 (patch) | |
| tree | 827f28a2cc407a932b5eb3d284dfc28dcb1f57ed /scripts | |
| parent | b6373e42752780c5f5e7c6f8ee8d502c33a07646 (diff) | |
| download | build-coordinator-cea8a56d7ba909a6b15f2a8de3f80e5eb66575d0.tar build-coordinator-cea8a56d7ba909a6b15f2a8de3f80e5eb66575d0.tar.gz | |
Make it possible to pass in substitute-urls to the agent
So that you don't have to just use the daemon's defaults.
Diffstat (limited to 'scripts')
| -rw-r--r-- | scripts/guix-build-coordinator-agent.in | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/scripts/guix-build-coordinator-agent.in b/scripts/guix-build-coordinator-agent.in index eff66e4..89bd375 100644 --- a/scripts/guix-build-coordinator-agent.in +++ b/scripts/guix-build-coordinator-agent.in @@ -42,6 +42,11 @@ (lambda (opt name arg result) (alist-cons 'password arg + result))) + (option '("substitute-urls") #t #f + (lambda (opt name arg result) + (alist-cons 'substitute-urls + (string-split arg #\space) result))))) (define %option-defaults @@ -65,4 +70,5 @@ (cdr (program-arguments))))) (run-agent (assq-ref opts 'uuid) (assq-ref opts 'coordinator) - (assq-ref opts 'password))) + (assq-ref opts 'password) + (assq-ref opts 'substitute-urls))) |