git.iko.soy/typeable/pandoc
on master help sign in
anyLine now requires that the line end with a newline (not eof).
e407279fiddlosopher
src/Text/Pandoc/Shared.hs+1−1
compare with master
unifiedsplit
@@ -218,7 +218,7 @@ a >>~ b = a >>= \x -> b >> return x
218
218
219-- | Parse any line of text
219-- | Parse any line of text
220anyLine :: GenParser Char st [Char]
220anyLine :: GenParser Char st [Char]
221−anyLine = manyTill anyChar (newline <|> (eof >> return '\n'))
221+anyLine = manyTill anyChar newline
222
222
223-- | Like @manyTill@, but reads at least one item.
223-- | Like @manyTill@, but reads at least one item.
224many1Till :: GenParser tok st a
224many1Till :: GenParser tok st a