From 367f115b71de8a361abf425dbb1c89a96ec2d595 Mon Sep 17 00:00:00 2001
From: Evan Silberman <evan@jklol.net>
Date: Sun, 3 Nov 2024 14:49:57 -0800
Subject: [PATCH] Handle column-list cells crossing input lines

---
 src/Text/Pandoc/Readers/Mdoc.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Text/Pandoc/Readers/Mdoc.hs b/src/Text/Pandoc/Readers/Mdoc.hs
index 3acd2e31ea19..205438d171d2 100644
--- 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