diff options
Diffstat (limited to 'bffe/server.scm')
-rw-r--r-- | bffe/server.scm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/bffe/server.scm b/bffe/server.scm index 112ae17..1bbbe67 100644 --- a/bffe/server.scm +++ b/bffe/server.scm @@ -507,8 +507,8 @@ ;; ".json" ))))) (case (most-appropriate-mime-type - '(application/json text/html) - mime-types) + mime-types + '(application/json text/html)) ((application/json) (render-json (json->scm body))) @@ -524,8 +524,8 @@ (string-append event-source "/agent/" agent-id)) #:headers '((accept . ((application/json))))))) (case (most-appropriate-mime-type - '(application/json text/html) - mime-types) + mime-types + '(application/json text/html)) ((application/json) (render-json (json->scm body))) |