aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Writers/Powerpoint/Presentation.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2021-10-04 12:18:18 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2021-10-04 12:24:12 -0700
commitb8d460eeabe97756d49e4bc5f00c6bb084b69aa5 (patch)
treecdb90c7e6034c56b35ad87f99cc372ddbd8fba5a /src/Text/Pandoc/Writers/Powerpoint/Presentation.hs
parent11baeb88505342c580cc3dd0263c4ba97e6ddb8a (diff)
downloadpandoc-b8d460eeabe97756d49e4bc5f00c6bb084b69aa5.tar.gz
Powerpoint writer: consolidate text runs when possible.
This slims down the output files by avoiding unnecessary text run elements. Updated golden tests.
Diffstat (limited to 'src/Text/Pandoc/Writers/Powerpoint/Presentation.hs')
-rw-r--r--src/Text/Pandoc/Writers/Powerpoint/Presentation.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Powerpoint/Presentation.hs b/src/Text/Pandoc/Writers/Powerpoint/Presentation.hs
index e3d31d099..99b016a63 100644
--- a/src/Text/Pandoc/Writers/Powerpoint/Presentation.hs
+++ b/src/Text/Pandoc/Writers/Powerpoint/Presentation.hs
@@ -348,7 +348,7 @@ instance Default PicProps where
--------------------------------------------------
inlinesToParElems :: [Inline] -> Pres [ParaElem]
-inlinesToParElems ils = concatMapM inlineToParElems ils
+inlinesToParElems = concatMapM inlineToParElems
inlineToParElems :: Inline -> Pres [ParaElem]
inlineToParElems (Str s) = do