From 8ced8cbc6e03212f7a9bd871d74ba0e2622c6233 Mon Sep 17 00:00:00 2001 From: Jesse Rosenthal Date: Thu, 8 Dec 2016 06:57:38 -0500 Subject: Docx reader: Ensure one-row tables don't have header. Tables in MS Word are set by default to have special first-row formatting, which pandoc uses to determine whether or not they have a header. This means that one-row tables will, by default, have only a header -- which we imagine is not what people want. This change ensures that a one-row table is not understood to be a header only. Note that this means that it is impossible to produce a header-only table from docx, even though it is legal pandoc. But we believe that in nearly all cases, it will be an accidental (and unwelcome) result Closes #3285. --- src/Text/Pandoc/Readers/Docx.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src') diff --git a/src/Text/Pandoc/Readers/Docx.hs b/src/Text/Pandoc/Readers/Docx.hs index 9fe3a3fea..c8a09248a 100644 --- a/src/Text/Pandoc/Readers/Docx.hs +++ b/src/Text/Pandoc/Readers/Docx.hs @@ -568,7 +568,8 @@ bodyPartToBlocks (Tbl _ _ _ []) = bodyPartToBlocks (Tbl cap _ look (r:rs)) = do let caption = text cap (hdr, rows) = case firstRowFormatting look of - True -> (Just r, rs) + True | null rs -> (Nothing, [r]) + | otherwise -> (Just r, rs) False -> (Nothing, r:rs) hdrCells <- case hdr of Just r' -> rowToBlocksList r' -- cgit v1.2.3