summaryrefslogtreecommitdiff
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
parent4c88ecaeca4098cfc5913fea060042b9fe48680e (diff)
Require texmath >= 0.3, adjusted for new elements.
-rw-r--r--pandoc.cabal2
-rw-r--r--src/Text/Pandoc/Readers/TeXMath.hs3
2 files changed, 4 insertions, 1 deletions
diff --git a/pandoc.cabal b/pandoc.cabal
index f6ebdde3c..9fd7bf916 100644
--- a/pandoc.cabal
+++ b/pandoc.cabal
@@ -154,7 +154,7 @@ Library
process >= 1, directory >= 1,
bytestring >= 0.9, zip-archive >= 0.1.1.4,
utf8-string >= 0.3, old-time >= 1,
- HTTP >= 4000.0.5, texmath, xml >= 1.3.5 && < 1.4,
+ HTTP >= 4000.0.5, texmath >= 0.3, xml >= 1.3.5 && < 1.4,
random, extensible-exceptions
if impl(ghc >= 6.10)
Build-depends: base >= 4 && < 5, syb
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