diff options
| -rw-r--r-- | pandoc.cabal | 2 | ||||
| -rw-r--r-- | src/Text/Pandoc/Readers/TeXMath.hs | 3 |
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 |