From 71ca44db6e8893b0394e6cd38c637deee0524371 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Sun, 30 Jan 2011 08:21:48 -0800
Subject: LaTeX reader:  Fixed bug with whitespace at beginning of file.

Previously a file beginning "   hi" would cause a parse error.
Also cleaned up comment parsing.
---
 src/Text/Pandoc/Readers/LaTeX.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/Text/Pandoc/Readers')

diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs
index 83b74a489..dca745b56 100644
--- a/src/Text/Pandoc/Readers/LaTeX.hs
+++ b/src/Text/Pandoc/Readers/LaTeX.hs
@@ -136,8 +136,8 @@ processLaTeXPreamble = do
 -- | Parse LaTeX and return 'Pandoc'.
 parseLaTeX :: GenParser Char ParserState Pandoc
 parseLaTeX = do
-  skipMany $ spaces >> comment
   spaces
+  skipMany $ comment >> spaces
   blocks <- try (processLaTeXPreamble >> environment "document")
            <|> (many block >>~ (spaces >> eof))
   state <- getState
@@ -528,7 +528,7 @@ skipChar = do
   return Null
 
 commentBlock :: GenParser Char st Block
-commentBlock = comment >> return Null
+commentBlock = many1 (comment >> spaces) >> return Null
 
 -- 
 -- inline
-- 
cgit v1.2.3