diff options
| author | Christopher Baines <mail@cbaines.net> | 2021-01-15 21:53:54 +0000 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2021-01-15 22:20:13 +0000 |
| commit | f7d3c4bb78cf40702268ceecbecc74d7c839629f (patch) | |
| tree | f0052b99517f6de1e038dd4077f03f11ec9e0d72 /scripts | |
| parent | b4ce30d7e0dc02d7a231dd0bb27c29843f2afb75 (diff) | |
| download | build-coordinator-f7d3c4bb78cf40702268ceecbecc74d7c839629f.tar build-coordinator-f7d3c4bb78cf40702268ceecbecc74d7c839629f.tar.gz | |
Use methods for the agent messaging
This will allow adding more agent messaging approaches.
Diffstat (limited to 'scripts')
| -rw-r--r-- | scripts/guix-build-coordinator-agent.in | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/scripts/guix-build-coordinator-agent.in b/scripts/guix-build-coordinator-agent.in index e8a2f0c..c68f94e 100644 --- a/scripts/guix-build-coordinator-agent.in +++ b/scripts/guix-build-coordinator-agent.in @@ -28,7 +28,8 @@ (ice-9 textual-ports) ((guix config) #:prefix guix-config:) (guix-build-coordinator utils) - (guix-build-coordinator agent)) + (guix-build-coordinator agent) + (guix-build-coordinator agent-messaging http)) (define %options ;; Specifications of the command-line options @@ -117,8 +118,10 @@ %option-defaults (cdr (program-arguments))))) (run-agent (assq-ref opts 'uuid) - (assq-ref opts 'coordinator) - (assq-ref opts 'password) + (make-http-agent-interface + (assq-ref opts 'coordinator) + (assq-ref opts 'uuid) + (assq-ref opts 'password)) (delete-duplicates (assq-ref opts 'systems)) (assq-ref opts 'max-parallel-builds) (or (assq-ref opts 'derivation-substitute-urls) |