diff options
author | John MacFarlane <jgm@berkeley.edu> | 2014-08-04 11:13:09 -0700 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2014-08-04 11:13:09 -0700 |
commit | 40d8100d440dd7924068d027e052f5a3de65e70f (patch) | |
tree | 6383616e5095559dbe9d02e9960a965dc69c5c53 /src/Text/Pandoc/Readers/HTML.hs | |
parent | 4630cff2a6c116f1d474f459e6e759f5ce7f2003 (diff) |
Use texmath 0.7 interface.
Diffstat (limited to 'src/Text/Pandoc/Readers/HTML.hs')
-rw-r--r-- | src/Text/Pandoc/Readers/HTML.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/HTML.hs b/src/Text/Pandoc/Readers/HTML.hs index 2e8b56124..1ded83ff1 100644 --- a/src/Text/Pandoc/Readers/HTML.hs +++ b/src/Text/Pandoc/Readers/HTML.hs @@ -57,7 +57,7 @@ import Control.Applicative ( (<$>), (<$), (<*), (*>), (<|>)) import Data.Monoid (mconcat, Monoid, mempty, (<>), First (..)) import Text.Printf (printf) import Debug.Trace (trace) -import Text.TeXMath (readMathML, writeTeXMath) +import Text.TeXMath (readMathML, writeTeX) import Data.Default (Default (..), def) import Control.Monad.Reader (Reader,ask, asks, local, runReader) @@ -572,7 +572,7 @@ pRawHtmlInline = do else return mempty mathMLToTeXMath :: String -> Either String String -mathMLToTeXMath s = writeTeXMath <$> readMathML s +mathMLToTeXMath s = writeTeX <$> readMathML s pMath :: Bool -> TagParser Inlines pMath inCase = try $ do |