diff options
| author | R. N. West (Nat) <[email protected]> | 2025-05-11 00:03:56 +0100 |
|---|---|---|
| committer | GitHub <[email protected]> | 2025-05-10 16:03:56 -0700 |
| commit | f66481f96e1738df077e03d3d93492d703e5b331 (patch) | |
| tree | 22b7011299ed0929440423801bc736126b1ef8d7 /src | |
| parent | 4fbc57a2788db8af37fbb2411a44c20b88189ab5 (diff) | |
Powerpoint writer: use reference-doc font for captions. (#10835)
Closes #9896.
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Writers/Powerpoint/Output.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/Powerpoint/Output.hs b/src/Text/Pandoc/Writers/Powerpoint/Output.hs index c0d1f2eba..2e51e6497 100644 --- a/src/Text/Pandoc/Writers/Powerpoint/Output.hs +++ b/src/Text/Pandoc/Writers/Powerpoint/Output.hs @@ -1059,7 +1059,8 @@ createCaption contentShapeDimensions paraElements = do mknode "p:sp" [] [ mknode "p:nvSpPr" [] [ mknode "p:cNvPr" [("id","1"), ("name","TextBox 3")] () , mknode "p:cNvSpPr" [("txBox", "1")] () - , mknode "p:nvPr" [] () + , mknode "p:nvPr" [] + [mknode "p:ph" [("idx", "1")] ()] ] , mknode "p:spPr" [] [ mknode "a:xfrm" [] |