From c54c3d50b0c3d08e5f8f03f8cc9e00aac2617cea Mon Sep 17 00:00:00 2001
From: John MacFarlane <fiddlosopher@gmail.com>
Date: Sun, 5 Feb 2012 08:46:04 -0800
Subject: LaTeX reader: Skip everything after \end{document}.

---
 src/Text/Pandoc/Readers/LaTeX.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Text/Pandoc/Readers/LaTeX.hs')

diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs
index c2b0cdd27..f06068497 100644
--- a/src/Text/Pandoc/Readers/LaTeX.hs
+++ b/src/Text/Pandoc/Readers/LaTeX.hs
@@ -653,7 +653,7 @@ rawLaTeXInline = do
 
 environments :: M.Map String (LP Blocks)
 environments = M.fromList
-  [ ("document", env "document" blocks)
+  [ ("document", env "document" blocks <* skipMany anyChar)
   , ("letter", env "letter" letter_contents)
   , ("center", env "center" blocks)
   , ("tabular", env "tabular" simpTable)
-- 
cgit v1.2.3