diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2016-07-14 23:38:20 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2016-07-14 23:38:20 -0700 |
| commit | c203ace13049f55a0772adce5462516b36b0fdd2 (patch) | |
| tree | 4b33a6973c0fa84a1796dd83d6e14430a5a008e1 /src/Text/Pandoc | |
| parent | d21701f66c4f07a796d409e16c03173700c74c38 (diff) | |
Haddock reader - support math.
The Haddock document model added elements for math
in 1.4.
Diffstat (limited to 'src/Text/Pandoc')
| -rw-r--r-- | src/Text/Pandoc/Readers/Haddock.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/Haddock.hs b/src/Text/Pandoc/Readers/Haddock.hs index 16f3d7ef3..f0521e6f7 100644 --- a/src/Text/Pandoc/Readers/Haddock.hs +++ b/src/Text/Pandoc/Readers/Haddock.hs @@ -60,6 +60,8 @@ docHToBlocks d' = DocEmphasis _ -> inlineFallback DocMonospaced _ -> inlineFallback DocBold _ -> inlineFallback + DocMathInline _ -> inlineFallback + DocMathDisplay _ -> inlineFallback DocHeader h -> B.header (headerLevel h) (docHToInlines False $ headerTitle h) DocUnorderedList items -> B.bulletList (map docHToBlocks items) @@ -107,6 +109,8 @@ docHToInlines isCode d' = DocMonospaced (DocString s) -> B.code s DocMonospaced d -> docHToInlines True d DocBold d -> B.strong (docHToInlines isCode d) + DocMathInline s -> B.math s + DocMathDisplay s -> B.displayMath s DocHeader _ -> mempty DocUnorderedList _ -> mempty DocOrderedList _ -> mempty |