1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
<!DOCTYPE html>
<html>
◊spell-of-summoning![]
◊(define article-html (crystalize-article! here doc))
◊(define page-title (article-plain-title here))
◊html$-page-head[page-title]
◊html$-page-body-open[]
◊article-html
◊html$-page-body-close[]
</html>
|
|
<
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
<!DOCTYPE html>
<html lang="en">
◊(define article-html (crystalize-article! here doc))
◊(define page-title (article-plain-title here))
◊html$-page-head[page-title]
◊html$-page-body-open[]
◊article-html
◊html$-page-body-close[]
</html>
|
