aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2019-12-30 09:51:27 +0000
committerChristopher Baines <mail@cbaines.net>2019-12-30 09:51:27 +0000
commit57ee3c8988dfdad0b0a8c34335872d547d00a616 (patch)
tree982ae61fc45f379ea48272bc9ad247d12b55d909
parent82b797ee9869ebe24f7dbbcc56c3d500e75dc2d3 (diff)
downloaddata-service-57ee3c8988dfdad0b0a8c34335872d547d00a616.tar
data-service-57ee3c8988dfdad0b0a8c34335872d547d00a616.tar.gz
Improve entity handling in the sxml module
This is useful as stexi->shtml uses *ENTITY* so handling this here means that the HTML output for texinfo is better.
-rw-r--r--guix-data-service/web/sxml.scm2
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 ...)