@@ -380,12 +380,12 @@ renderInlineList :: PandocMonad m
380380 -> StateT WriterState m Doc
381381renderInlineList True [] = pure "<verbatim></verbatim>"
382382renderInlineList False [] = pure ""
383−renderInlineList start lst@(x:xs) = do r <- inlineToMuse x
384− opts <- gets stOptions
385− lst' <- renderInlineList (x == SoftBreak && writerWrapText opts == WrapPreserve) xs --hcat <$> mapM inlineToMuse xs
386− if start && fixOrEscape x
387− then pure ((text "<verbatim></verbatim>") <> r <> lst')
388− else pure (r <> lst')
383+renderInlineList start (x:xs) = do r <- inlineToMuse x
384+ opts <- gets stOptions
385+ lst' <- renderInlineList (x == SoftBreak && writerWrapText opts == WrapPreserve) xs --hcat <$> mapM inlineToMuse xs
386+ if start && fixOrEscape x
387+ then pure ((text "<verbatim></verbatim>") <> r <> lst')
388+ else pure (r <> lst')
389389
390390-- | Normalize and convert list of Pandoc inline elements to Muse.
391391inlineListToMuse'' :: PandocMonad m