Index: tags-html.rkt
==================================================================
--- tags-html.rkt
+++ tags-html.rkt
@@ -93,20 +93,20 @@
 (define (html-block . elements)
   `(section [[class "content-block"]] (div [[class "content-block-main"]] ,@elements)))
 
 (define (html-root . elements)
   (define first-pass
-    (decode-elements elements
+    (decode-elements (append elements (list (html-footnote-block)))
                      #:txexpr-elements-proc decode-hardwrapped-paragraphs
                      #:exclude-tags '(script style figure table pre)))
   (define second-pass
     (decode-elements first-pass
                      #:block-txexpr-proc detect-newthoughts
                      #:inline-txexpr-proc decode-link-urls
                      #:string-proc (compose1 smart-quotes smart-dashes)
                      #:exclude-tags '(script style pre code)))
-  `(body ,@second-pass ,(html-footnote-block)))
+  `(body ,@second-pass))
 
 (define (html-blockcode attrs elems)
   (define file (or (assoc 'filename attrs) ""))
   (define codeblock `(pre [[class "code"]] (code ,@elems)))
   (cond [(string>? file "") `(@ (div [[class "listing-filename"]] 128196 " " ,file) ,codeblock)]