diff options
| author | Christopher Baines <mail@cbaines.net> | 2023-04-30 19:12:53 +0200 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2023-04-30 19:12:53 +0200 |
| commit | 86df0679612d2b85350ce8def48e319579f7f845 (patch) | |
| tree | c2e70f9388d0687a5e529b4b41ade463293d5680 | |
| parent | eb6aec6f07eec089c56ac345f513da4ed3c115a0 (diff) | |
| download | bffe-86df0679612d2b85350ce8def48e319579f7f845.tar bffe-86df0679612d2b85350ce8def48e319579f7f845.tar.gz | |
Add .json suffixes to the agent and build requests
So that we get back JSON rather than HTML when talking to another bffe
instance.
| -rw-r--r-- | bffe/server.scm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/bffe/server.scm b/bffe/server.scm index 4c24559..2488fef 100644 --- a/bffe/server.scm +++ b/bffe/server.scm @@ -438,9 +438,7 @@ body (http-get (string->uri - (string-append event-source "/build/" uuid - ;; ".json" - ))))) + (string-append event-source "/build/" uuid ".json"))))) (case (most-appropriate-mime-type '(application/json text/html) mime-types) @@ -458,7 +456,7 @@ body (http-get (string->uri - (string-append event-source "/agent/" agent-id))))) + (string-append event-source "/agent/" agent-id ".json"))))) (case (most-appropriate-mime-type '(application/json text/html) mime-types) |