RST reader: skip blanklines at beginning, not all leading spaces.

If you skip all spaces, it becomes impossible to start with
a blockquote.
This commit is contained in:
John MacFarlane 2011-01-28 12:30:33 -08:00
parent 8c435578d6
commit 7f5130709b

View file

@ -91,7 +91,7 @@ titleTransform blocks = (blocks, [])
parseRST :: GenParser Char ParserState Pandoc
parseRST = do
spaces -- skip blanks at beginning of file
optional blanklines -- skip blank lines at beginning of file
startPos <- getPosition
-- go through once just to get list of reference keys and notes
-- docMinusKeys is the raw document with blanks where the keys were...