diff options
Diffstat (limited to 'Text')
| -rw-r--r-- | Text/Pandoc/Readers/Markdown.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Text/Pandoc/Readers/Markdown.hs b/Text/Pandoc/Readers/Markdown.hs index ded9f2136..75b9ad134 100644 --- a/Text/Pandoc/Readers/Markdown.hs +++ b/Text/Pandoc/Readers/Markdown.hs @@ -704,7 +704,7 @@ math = try $ do notFollowedBy space words <- sepBy1 mathWord (many1 space) char '$' - return $ TeX ("$" ++ (joinWithSep " " words) ++ "$") + return $ Math $ joinWithSep " " words emph = ((enclosed (char '*') (char '*') inline) <|> (enclosed (char '_') (char '_' >> notFollowedBy alphaNum) inline)) >>= |