badrihippo
/
guile-strickenmark
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix list item with multi-blank lines

This commit is contained in:
Erik Edrosa 2020-04-29 22:21:12 -04:00
parent 3aee562864
commit 538ffea25c
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
commonmark/blocks.scm
View File

@ -166,7 +166,7 @@
((and (empty-line parser) (no-children? node))
(add-child-node node (make-blank-node)))
((and (empty-line parser) (blank-node? (last-child node)))
(close-node (remove-last-child node)))
node) ;; may be separated by more than one blank line
((empty-line parser)
(cond ((open-descendant? node 'fenced-code)
(parse-container-block node parser))

2
tests/blocks/list-items.scm
View File

@ -103,7 +103,6 @@ not column"
('paragraph _ ('text _ "2.two"))
('paragraph _ ('text _ "-one"))))
;; TODO list items can contain more than one blank line
(block-expect "parse-blocks, list item may contain blocks separated by more than one blank
line"
"- foo
@ -118,6 +117,7 @@ line"
(block-expect "parse-blocks, list item may contain any kind of block"
"1. foo
```
bar
```