paku/hsx
1
0
Fork 0
Code Issues Pull requests Projects Releases 1 Packages Wiki Activity Actions

Improve pretty printing

Browse source
This commit is contained in:
paku 2024-02-20 17:01:19 +09:00
parent 7d94d02f42
commit 929b93960d
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/generator.lisp
View file

@ -47,7 +47,7 @@
(if (elm:element-children element)
(format stream (if (rest (elm:element-children element))
"~@<<~a~a>~2I~:@_~<~@{~a~^~:@_~}~:>~0I~:@_</~a>~:>"
"~@<<~a~a>~2I~:_~<~a~:>~0I~:_</~a>~:>")
"~@<<~a~a>~2I~:_~<~a~^~:@_~:>~0I~_</~a>~:>")
(elm:element-tag element)
(elm:element-attrs element)
(elm:element-children element)