1
0
Fork 0

Fix html translation

This commit is contained in:
Andy Wingo 2022-10-23 21:48:57 +02:00
parent 304f8839ec
commit ba9a560f01

View file

@ -682,5 +682,5 @@
(else 'h6)))) (else 'h6))))
`(,tag . ,(map transform-inline body)))))) `(,tag . ,(map transform-inline body))))))
(match exp (match exp
(('top exp ...) (('begin exp ...)
`(div . ,(map transform-block exp))))) `(div . ,(map transform-block exp)))))