Fix the arguments to most-appropriate-mime-type

This commit is contained in:
Christopher Baines 2024-06-24 09:59:37 +01:00
parent eeb026b654
commit d7103eccc9

View file

@ -719,8 +719,8 @@
#:on-error 'backtrace
#:post-error (lambda args
(case (most-appropriate-mime-type
'(application/json text/html)
mime-types)
mime-types
'(text/html application/json))
((application/json)
(render-json `((error . ,(if (%show-error-details)
(simple-format #f "~A" args)