diff options
author | John MacFarlane <jgm@berkeley.edu> | 2017-03-07 14:57:11 +0100 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2017-03-07 15:00:32 +0100 |
commit | 8c55b7b5640e41feaae658e95e659bdd2101a340 (patch) | |
tree | dd6b64f99e413bec7823a88d4131ed835fed7e16 /src | |
parent | 69e1b959e001f1ce23b7dbfda4401c82a70922ac (diff) | |
download | pandoc-8c55b7b5640e41feaae658e95e659bdd2101a340.tar.gz |
Markdown reader: Treat certain environments as inline
when they occur without space surrounding them.
E.g. equation, math.
This avoids incorrect vertical space around equations.
Closes #3309.
Closes #2171.
See also rstudio/bookdown#358.
Diffstat (limited to 'src')
-rw-r--r-- | src/Text/Pandoc/Readers/LaTeX.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs index c5f5df6dc..60113173d 100644 --- a/src/Text/Pandoc/Readers/LaTeX.hs +++ b/src/Text/Pandoc/Readers/LaTeX.hs @@ -1063,7 +1063,9 @@ rawLaTeXBlock = snd <$> try (withRaw (environment <|> blockCommand)) rawLaTeXInline :: PandocMonad m => LP m Inline rawLaTeXInline = do - raw <- (snd <$> withRaw inlineCommand) <|> (snd <$> withRaw blockCommand) + raw <- (snd <$> withRaw inlineCommand) + <|> (snd <$> withRaw inlineEnvironment) + <|> (snd <$> withRaw blockCommand) RawInline "latex" <$> applyMacros' raw addImageCaption :: PandocMonad m => Blocks -> LP m Blocks |