39
40
41
42
43
44
45
46
47
48
49
|
39
40
41
42
43
44
45
46
47
48
49
|
-
+
|
(define (html$-page-body-open [class ""])
(define body-class (if (non-empty-string? class) (format " class=\"~a\"" class) ""))
◊string-append{<body◊|body-class|><main>
<a href="/"><header>
<img src="/web-extra/mark.svg" height="103" class="logo">
<img src="/web-extra/mark.svg" alt="The Local Yarn" height="103" class="logo">
<h1>The Local Yarn</h1>
</header></a>})
(define (html$-article-open pagenode title? title-tx published)
(cond
|
