aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorJohn MacFarlane <[email protected]>2023-05-08 12:39:50 -0700
committerJohn MacFarlane <[email protected]>2023-05-08 12:39:50 -0700
commitca5940bf2c36e4329cf6bc726763817e928a30db (patch)
tree384c3722962c930eade786ca135ae8f9f5763266 /src
parentc97db9af26da666667f6173e31c97c846ec2cb5f (diff)
LaTeX writer: fix width for multicolumn simple table.
This should help with #8831. I'm not sure this is the best solution, but it's certainly better than what we had before!
Diffstat (limited to 'src')
-rw-r--r--src/Text/Pandoc/Writers/LaTeX/Table.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/LaTeX/Table.hs b/src/Text/Pandoc/Writers/LaTeX/Table.hs
index 63683f79f..6ebcaa559 100644
--- a/src/Text/Pandoc/Writers/LaTeX/Table.hs
+++ b/src/Text/Pandoc/Writers/LaTeX/Table.hs
@@ -356,7 +356,7 @@ multicolumnDescriptor align
(ColumnCount numcols)
(Ann.ColNumber colnum) =
let toWidth = \case
- ColWidthDefault -> 0
+ ColWidthDefault -> (1 / fromIntegral numcols)
ColWidth x -> x
colspan = length colWidths
width = sum $ NonEmpty.map toWidth colWidths