Handle column-list cells crossing input lines

jgm · Nov 3, 2024 · 367f115 · 367f115
1 parent 5934c8b
commit 367f115
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/Text/Pandoc/Readers/Mdoc.hs b/src/Text/Pandoc/Readers/Mdoc.hs
@@ -1037,12 +1037,12 @@ parseColumnList :: PandocMonad m => MdocParser m Blocks
 parseColumnList = do
   literal "-column"
   many skipListArgument
-  _ <- litsToText -- XXX use the column widths?
+  _ <- litsToText
   eol
   rows <- many listRow
   return $ B.simpleTable [] rows
   where
-    listRow = macro "It" >> fmap B.plain <$> sepBy parseInline (macro "Ta")
+    listRow = macro "It" >> fmap B.plain <$> sepBy parseInlines (macro "Ta")
 
 parseBl :: PandocMonad m => MdocParser m Blocks
 parseBl = do