Index: tags-html.rkt
==================================================================
--- tags-html.rkt
+++ tags-html.rkt
@@ -114,11 +114,11 @@
   (define codeblock `(pre [[class "code"]] (code ,@elems)))
   (cond [(string>? file "") `(@ (div [[class "listing-filename"]] 128196 " " ,file) ,codeblock)]
         [else codeblock]))
 
 (define (html-say . elems)
-  `(@ (dt ,(car elems)) (dd ,@(cdr elems))))
+  `(@ (dt ,(car elems) (span [[class "x"]] ": ")) (dd ,@(cdr elems))))
 
 (define (html-verse attrs elems)
   (let* ([title  (maybe-attr 'title attrs "")]
          [italic? (assoc 'italic attrs)]
          [pre-attrs (cond [italic? '([class "verse"] [style "font-style: italic"])]