Markdown writer: put space between Plain and following fenced Div.

Closes #4465.
This commit is contained in:
John MacFarlane 2021-06-28 11:27:37 -07:00
parent 4a7a0cff29
commit dd098d4e15
2 changed files with 18 additions and 0 deletions

View file

@ -791,6 +791,9 @@ blockListToMarkdown opts blocks = do
b1 : commentSep : fixBlocks (b2:bs)
fixBlocks (Plain ils : bs@(RawBlock{}:_)) =
Plain ils : fixBlocks bs
fixBlocks (Plain ils : bs@(Div{}:_))
| isEnabled Ext_fenced_divs opts =
Para ils : fixBlocks bs
fixBlocks (Plain ils : bs) | inlist =
Plain ils : fixBlocks bs
fixBlocks (Plain ils : bs) =

15
test/command/4465.md Normal file
View file

@ -0,0 +1,15 @@
```
% pandoc -f html -t markdown
<ol>
<li>An ordered list can contain block-level elements ind html, it means that divs are also allowed.</li>
<li>Let's see the problem! <div class="example">This is an example.</div></li>
</ol>
^D
1. An ordered list can contain block-level elements ind html, it means
that divs are also allowed.
2. Let\'s see the problem!
::: example
This is an example.
:::
```