@@ -235,11 +235,11 @@
 (define (make-article-footertext pagenode series disposition disp-note-id note-count)
   (define s-title (series-title))
   (define s-noun (series-noun))
   (define series-part
     (cond [(non-empty-string? s-title)
-           (format "This is ~a, part of <a href=\"/~a\">‘~a’</a>."
+           (format "<span class=\"series-part\">This is ~a, part of <a href=\"/~a\">‘~a’</a>.</span>"
                    s-noun
                    series
                    s-title)]
           [else ""]))
   (define disp-part
@@ -259,11 +259,11 @@
            (format "There is <a href=\"/~a#furthernotes\">a note</a> appended."
                    pagenode)]
           [else ""]))
   
   (cond [(ormap non-empty-string? (list series-part disp-part notes-part))
-         (format "~a ~a ~a" series-part disp-part notes-part)]
+         (string-join (list series-part disp-part notes-part))]
         [else ""]))
     
 
 ;; ~~~ Notes ~~~