@@ -60,6 +60,8 @@ docHToBlocks d' =
60 DocEmphasis _ -> inlineFallback
60 DocEmphasis _ -> inlineFallback
61 DocMonospaced _ -> inlineFallback
61 DocMonospaced _ -> inlineFallback
62 DocBold _ -> inlineFallback
62 DocBold _ -> inlineFallback
63+ DocMathInline _ -> inlineFallback
64+ DocMathDisplay _ -> inlineFallback
63 DocHeader h -> B.header (headerLevel h)
65 DocHeader h -> B.header (headerLevel h)
64 (docHToInlines False $ headerTitle h)
66 (docHToInlines False $ headerTitle h)
65 DocUnorderedList items -> B.bulletList (map docHToBlocks items)
67 DocUnorderedList items -> B.bulletList (map docHToBlocks items)
@@ -107,6 +109,8 @@ docHToInlines isCode d' =
107 DocMonospaced (DocString s) -> B.code s
109 DocMonospaced (DocString s) -> B.code s
108 DocMonospaced d -> docHToInlines True d
110 DocMonospaced d -> docHToInlines True d
109 DocBold d -> B.strong (docHToInlines isCode d)
111 DocBold d -> B.strong (docHToInlines isCode d)
112+ DocMathInline s -> B.math s
113+ DocMathDisplay s -> B.displayMath s
110 DocHeader _ -> mempty
114 DocHeader _ -> mempty
111 DocUnorderedList _ -> mempty
115 DocUnorderedList _ -> mempty
112 DocOrderedList _ -> mempty
116 DocOrderedList _ -> mempty