@@ -1,13 +1,16 @@ -◊html$-page-head[(select-from-metas 'title here)] +◊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[] -◊spell-of-summoning![] -◊crystalize-article![here doc] +◊article-html ◊html$-page-body-close[]