Index: snippets-html.rkt
==================================================================
--- snippets-html.rkt
+++ snippets-html.rkt
@@ -38,11 +38,11 @@
  ◊if[close-head? "</head>" ""]})
 
 (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>
+ <a href="/index.html"><header>
  <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)