summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers/Powerpoint/Output.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text/Pandoc/Writers/Powerpoint/Output.hs')
-rw-r--r--src/Text/Pandoc/Writers/Powerpoint/Output.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Powerpoint/Output.hs b/src/Text/Pandoc/Writers/Powerpoint/Output.hs
index 63e145cee..6446b3056 100644
--- a/src/Text/Pandoc/Writers/Powerpoint/Output.hs
+++ b/src/Text/Pandoc/Writers/Powerpoint/Output.hs
@@ -1423,7 +1423,7 @@ graphicToElement tableWidth (Tbl widths tblPr hdrCells rows) = do
else replicate (length hdrCells) $
tableWidth `div` toInteger (length hdrCells)
else map (\w -> round $ w / totalWidth * fromIntegral tableWidth) widths
-
+
let cellToOpenXML paras =
do elements <- mapM paragraphToElement paras
let elements' = if null elements