git.iko.soy/typeable/pandoc
on master help sign in
Markdown reader: fixed parsing of fenced code after list...
5ab1162John MacFarlane
src/Text/Pandoc/Readers/Markdown.hs+4−1
compare with master
unifiedsplit
@@ -868,7 +868,10 @@ rawListItem :: PandocMonad m
868rawListItem start = try $ do
868rawListItem start = try $ do
869 start
869 start
870 first <- listLineCommon
870 first <- listLineCommon
871− rest <- many (notFollowedBy listStart >> notFollowedBy blankline >> listLine)
871+ rest <- many (do notFollowedBy listStart
872+ notFollowedBy (() <$ codeBlockFenced)
873+ notFollowedBy blankline
874+ listLine)
872 blanks <- many blankline
875 blanks <- many blankline
873 return $ unlines (first:rest) ++ blanks
876 return $ unlines (first:rest) ++ blanks
874
877
test/command/3733.mdnew file+13
@@ -0,0 +1,13 @@
1+````
2+% pandoc -t native
3+- Item1
4+- Item2
5+```yaml
6+some: code
7+```
8+^D
9+[BulletList
10+ [[Plain [Str "Item1"]]
11+ ,[Plain [Str "Item2"]]]
12+,CodeBlock ("",["yaml"],[]) "some: code"]
13+````