diff options
| -rw-r--r-- | guix-data-service/web/sxml.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/guix-data-service/web/sxml.scm b/guix-data-service/web/sxml.scm index 468b81f..5b478e0 100644 --- a/guix-data-service/web/sxml.scm +++ b/guix-data-service/web/sxml.scm @@ -359,6 +359,8 @@ list ATTRS and the child nodes in BODY." ;; Unescaped, raw HTML output (('raw html) (display html port)) + (('*ENTITY* name) + (simple-format port "&~A;" name)) (((? symbol? tag) ('@ attrs ...) body ...) (element->html tag attrs body port)) (((? symbol? tag) body ...) |