diff --git a/src/FibLib/HtmlPrinter.fs b/src/FibLib/HtmlPrinter.fs
index d435718..17c607d 100644
--- a/src/FibLib/HtmlPrinter.fs
+++ b/src/FibLib/HtmlPrinter.fs
@@ -12,9 +12,13 @@ module HtmlPrinter =
         |> List.map (fun k -> sprintf "%s=\"%s\"" (fst k) (snd k)) 
         |> String.concat " "
     let rec renderInline =
+        let renderAll l =
+            l
+            |> List.map renderInline
+            |> String.concat ""
         function
         | Text t -> WebUtility.HtmlEncode t
-	| Strong(t) -> sprintf "<strong>%s</strong>" (renderInline t)
+        | Strong(t) -> sprintf "<strong>%s</strong>" (renderAll t)
         | RawHtml h ->
             h
         | _ -> ""