@@ -19,11 +19,10 @@
          html$-page-body-open
          html$-article-open
          html$-article-close
          html$-article-listing-short
          html$-page-body-close
-         html$-note-title
          html$-note-contents
          html$-note-listing-full
          html$-note-in-article
          html$-notes-section
          html$-paginate-navlinks)
@@ -79,15 +78,10 @@
   ◊string-append{<footer>By Joel Dueck</footer>
  </main></body>})
 
 ;; Notes
 ;;
-(define (html$-note-title pagenode parent-title)
-  (format "Re: <a class=\"cross-reference\" href=\"/~a\">~a</a>"
-          pagenode
-          parent-title))
-
 (define (html$-note-contents disposition-mark disposition-verb elems)
   (define disposition
     (cond [(non-empty-string? disposition-mark)
            `(abbr [[class "disposition-mark-in-note"]
                    [title ,(string-append "The original article is herewith considered "