[Chicken-users] Returning JSON in Awful

[David Ireland]

Hi,

I've started using Awful 1.0 and having trouble returning a JSON string.
The inverted commas are being replaced by &quot. For example, using the
code below returns  {"a" : 1 }

Should this be normal behavior when returning JSON strings?

Thanks.
David

(use
awful)

(enable-sxml
#t)



(define my-json "{\"a\" : 1
}")


(define (define-json path
body)

  (define-page
path

    (λ
()

      (awful-response-headers '((content-type
"text/json")))

(body))

    no-template:
#t))



(define-json
(main-page-path)

  (λ ()
`(,my-json)))

_______________________________________________
Chicken-users mailing list
Chicken-users@nongnu.org
https://lists.nongnu.org/mailman/listinfo/chicken-users