diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2010-10-19 13:22:50 -0700 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2010-10-19 13:22:50 -0700 |
| commit | 11672c49873694ac5bce02ed836ce1d5bfa5b47f (patch) | |
| tree | b042befb0a9b92a7edb68079947d45333c6f9cb6 /src/Text/Pandoc/Readers/TeXMath.hs | |
| parent | 90bae29216fb87181dfd80a61fb21380ea013135 (diff) | |
TeXMath reader: handle \textit, \textbf, etc.
Diffstat (limited to 'src/Text/Pandoc/Readers/TeXMath.hs')
| -rw-r--r-- | src/Text/Pandoc/Readers/TeXMath.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/TeXMath.hs b/src/Text/Pandoc/Readers/TeXMath.hs index b0c6e86d4..f293299ec 100644 --- a/src/Text/Pandoc/Readers/TeXMath.hs +++ b/src/Text/Pandoc/Readers/TeXMath.hs @@ -89,6 +89,10 @@ expToInlines (ESubsup x y z) = do expToInlines (EDown x y) = expToInlines (ESub x y) expToInlines (EUp x y) = expToInlines (ESuper x y) expToInlines (EDownup x y z) = expToInlines (ESubsup x y z) -expToInlines (EText _ x) = Just [Emph [Str x]] +expToInlines (EText "normal" x) = Just [Str x] +expToInlines (EText "bold" x) = Just [Strong [Str x]] +expToInlines (EText "monospace" x) = Just [Code x] +expToInlines (EText "italic" x) = Just [Emph [Str x]] +expToInlines (EText _ x) = Just [Str x] expToInlines _ = Nothing |