diff options
| author | Christopher Baines <mail@cbaines.net> | 2019-11-24 12:59:09 +0000 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2019-11-24 20:18:08 +0000 |
| commit | 5663235048b7341b378634d083eaae9f13580e07 (patch) | |
| tree | a714cd2c593517faaca2b01f754646ebc9ae7d41 /guix-data-service/web/render.scm | |
| parent | 0ffd8caeeb8a0713300ed90bbcad1775078db0af (diff) | |
| download | data-service-5663235048b7341b378634d083eaae9f13580e07.tar data-service-5663235048b7341b378634d083eaae9f13580e07.tar.gz | |
Rework the builds and build_status tables as well as related code
Allow for build status information to be submitted by POST request. This
required some changes to the builds and build_status tables, as for example,
the Cuirass build id may not be available, and the derivation may not be know
yet, so just record the derivation file name.
Diffstat (limited to 'guix-data-service/web/render.scm')
| -rw-r--r-- | guix-data-service/web/render.scm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/guix-data-service/web/render.scm b/guix-data-service/web/render.scm index eeaf99d..880035e 100644 --- a/guix-data-service/web/render.scm +++ b/guix-data-service/web/render.scm @@ -39,6 +39,7 @@ not-found unprocessable-entity created + no-content redirect)) (define file-mime-types @@ -167,6 +168,10 @@ (list (build-response #:code 201) "")) +(define (no-content) + (list (build-response #:code 204) + "")) + (define (redirect path) (let ((uri (build-uri 'http #:host (%config 'host) |