git.iko.soy/typeable/pandoc
on master help sign in
Removed unneeded 'do' block from 'parseBlocks' definition
83cddbcfiddlosopher
src/Text/Pandoc/Readers/Markdown.hs+1−3
@@ -181,9 +181,7 @@ parseMarkdown = do
181-- parsing blocks
181-- parsing blocks
182--
182--
183
183
184−parseBlocks = do
185− result <- manyTill block eof
184+parseBlocks = manyTill block eof
186− return result
187
185
188block = choice [ codeBlock, note, referenceKey, header, hrule, list,
186block = choice [ codeBlock, note, referenceKey, header, hrule, list,
189 blockQuote, htmlBlock, rawLaTeXEnvironment', para,
187 blockQuote, htmlBlock, rawLaTeXEnvironment', para,