diff options
author | John MacFarlane <jgm@berkeley.edu> | 2010-12-30 22:05:19 -0800 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2010-12-30 22:05:19 -0800 |
commit | b05e739c6dcc33866c6e34017778f50da2692a8a (patch) | |
tree | cdcafb6c93e391409ef3320b075d5979589f7f32 /src/Text | |
parent | d6f28af9cbde4c1db6f91eb7c5d15881ccb822f0 (diff) | |
download | pandoc-b05e739c6dcc33866c6e34017778f50da2692a8a.tar.gz |
LaTeX reader: Allow ignored comments after \end{document}.
Diffstat (limited to 'src/Text')
-rw-r--r-- | src/Text/Pandoc/Readers/LaTeX.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs index 561038081..659382772 100644 --- a/src/Text/Pandoc/Readers/LaTeX.hs +++ b/src/Text/Pandoc/Readers/LaTeX.hs @@ -128,9 +128,7 @@ parseLaTeX :: GenParser Char ParserState Pandoc parseLaTeX = do spaces blocks <- try (processLaTeXPreamble >> spaces >> environment "document") - <|> many block - spaces - eof + <|> (many block >>~ (spaces >> eof)) state <- getState let blocks' = filter (/= Null) blocks let title' = stateTitle state |