git.iko.soy/typeable/pandoc
on master help sign in
Markdown reader: Fixed bug with unwanted code in lists.
3e42f08John MacFarlane
src/Text/Pandoc/Readers/Markdown.hs+1
@@ -746,6 +746,7 @@ listLine = try $ do
746 many spaceChar
746 many spaceChar
747 listStart)
747 listStart)
748 notFollowedBy' $ htmlTag (~== TagClose "div")
748 notFollowedBy' $ htmlTag (~== TagClose "div")
749+ nonindentSpaces
749 chunks <- manyTill
750 chunks <- manyTill
750 ( many1 (satisfy $ \c -> c /= '\n' && c /= '<')
751 ( many1 (satisfy $ \c -> c /= '\n' && c /= '<')
751 <|> liftM snd (htmlTag isCommentTag)
752 <|> liftM snd (htmlTag isCommentTag)