summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers/Math.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2016-12-03 16:30:47 +0100
committerJohn MacFarlane <jgm@berkeley.edu>2017-01-25 17:07:40 +0100
commit29b3975cbec5d393e404f96e5f68506587ee74de (patch)
tree67983165ba28bf6e93224eb47925f1bb76e03352 /src/Text/Pandoc/Writers/Math.hs
parent830be4d63204b918afd15615d965bfbc40886cbe (diff)
Make sure texMathToInlines issues warning.
Diffstat (limited to 'src/Text/Pandoc/Writers/Math.hs')
-rw-r--r--src/Text/Pandoc/Writers/Math.hs4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Math.hs b/src/Text/Pandoc/Writers/Math.hs
index 4540a2479..a7fe6d648 100644
--- a/src/Text/Pandoc/Writers/Math.hs
+++ b/src/Text/Pandoc/Writers/Math.hs
@@ -19,7 +19,9 @@ texMathToInlines mt inp = do
res <- convertMath writePandoc mt inp
case res of
Right (Just ils) -> return ils
- Right (Nothing) -> return [mkFallback mt inp]
+ Right (Nothing) -> do
+ warn $ "Could not render TeX math as unicode, rendering as raw TeX:\n" ++ inp
+ return [mkFallback mt inp]
Left il -> return [il]
mkFallback :: MathType -> String -> Inline