aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Text/Pandoc/Readers/LaTeX/Math.hs5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX/Math.hs b/src/Text/Pandoc/Readers/LaTeX/Math.hs
index 44de688d5..81a1d9831 100644
--- a/src/Text/Pandoc/Readers/LaTeX/Math.hs
+++ b/src/Text/Pandoc/Readers/LaTeX/Math.hs
@@ -2,6 +2,7 @@
module Text.Pandoc.Readers.LaTeX.Math
( dollarsMath
, inlineEnvironments
+ , inlineEnvironmentNames
, inlineEnvironment
, mathInline
, mathDisplay
@@ -80,6 +81,10 @@ inlineEnvironment = try $ do
name <- untokenize <$> braced
M.findWithDefault mzero name inlineEnvironments
+inlineEnvironmentNames :: [Text]
+inlineEnvironmentNames =
+ M.keys (inlineEnvironments :: M.Map Text (LP PandocPure Inlines))
+
inlineEnvironments :: PandocMonad m => M.Map Text (LP m Inlines)
inlineEnvironments = M.fromList [
("displaymath", mathEnvWith id Nothing "displaymath")