Asciidoc writer: ensure correct nesting strong/emph.

Closes #5565.
2019-06-10 14:42:08 -07:00 · 2019-06-10 14:42:08 -07:00 · 2e12106a90
commit 2e12106a90
parent 01bbb52628
2 changed files with 8 additions and 0 deletions
--- a/src/Text/Pandoc/Writers/AsciiDoc.hs
+++ b/src/Text/Pandoc/Writers/AsciiDoc.hs
@ -405,6 +405,8 @@ withIntraword p = setIntraword True *> p <* setIntraword False

 -- | Convert Pandoc inline element to asciidoc.
 inlineToAsciiDoc :: PandocMonad m => WriterOptions -> Inline -> ADW m Doc
+inlineToAsciiDoc opts (Emph [Strong xs]) =
+  inlineToAsciiDoc opts (Strong [Emph xs])  -- see #5565
 inlineToAsciiDoc opts (Emph lst) = do
  contents <- inlineListToAsciiDoc opts lst
  isIntraword <- gets intraword
--- a/test/command/5565.md
+++ b/test/command/5565.md
@ -0,0 +1,6 @@
+```
+% pandoc -t asciidoc
+***hi***
+^D
+*_hi_*
+```