aboutsummaryrefslogtreecommitdiff
path: root/src/Text
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2010-07-22 15:06:46 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2010-07-22 15:06:46 -0700
commit2253c8ef65548afceb668075c92f4b289d1e86b0 (patch)
tree9265e974f9ab8b8ae5f4ec44007a1e0dace83754 /src/Text
parent4c88ecaeca4098cfc5913fea060042b9fe48680e (diff)
downloadpandoc-2253c8ef65548afceb668075c92f4b289d1e86b0.tar.gz
Require texmath >= 0.3, adjusted for new elements.
Diffstat (limited to 'src/Text')
-rw-r--r--src/Text/Pandoc/Readers/TeXMath.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/TeXMath.hs b/src/Text/Pandoc/Readers/TeXMath.hs
index 40cf39987..b0c6e86d4 100644
--- a/src/Text/Pandoc/Readers/TeXMath.hs
+++ b/src/Text/Pandoc/Readers/TeXMath.hs
@@ -86,6 +86,9 @@ expToInlines (ESubsup x y z) = do
y' <- expToInlines y
z' <- expToInlines z
return $ x' ++ [Subscript y'] ++ [Superscript z']
+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 _ = Nothing