aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2011-08-28 14:14:21 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2011-08-28 14:14:21 -0700
commit2f0975bb5de0600f5297a5f5bd563cc135e6c634 (patch)
tree9c1d1366f09c1e11c325ac8ca437634bfa6122fb
parent2c15a876d8cf1606ee4a5def9189f1deb45cb26c (diff)
parent724de8314c15462ec3eda23df063fe36ccbc9184 (diff)
downloadpandoc-2f0975bb5de0600f5297a5f5bd563cc135e6c634.tar.gz
Merge pull request #295 from takahashim/fixfootnotes
allow footnotes followed by newline without space chars in reST
-rw-r--r--src/Text/Pandoc/Readers/RST.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/RST.hs b/src/Text/Pandoc/Readers/RST.hs
index 7fda0da19..49ddb90fc 100644
--- a/src/Text/Pandoc/Readers/RST.hs
+++ b/src/Text/Pandoc/Readers/RST.hs
@@ -526,8 +526,8 @@ noteBlock = try $ do
string ".."
spaceChar >> skipMany spaceChar
ref <- noteMarker
- spaceChar >> skipMany spaceChar
- first <- anyLine
+ first <- (spaceChar >> skipMany spaceChar >> anyLine)
+ <|> (newline >> return "")
blanks <- option "" blanklines
rest <- option "" indentedBlock
endPos <- getPosition