From 6c1692ea2271446caba6e95d43aeee6db805e3ce Mon Sep 17 00:00:00 2001 From: Andrew Dunning Date: Fri, 15 Nov 2019 16:45:18 +0000 Subject: LaTeX Reader: Add KOMA-Script metadata commands (#5910) Add all titling commands to existing definition for `\dedication`. --- src/Text/Pandoc/Readers/LaTeX.hs | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) (limited to 'src/Text/Pandoc/Readers') diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs index 5c9a3e69c..339494bc3 100644 --- a/src/Text/Pandoc/Readers/LaTeX.hs +++ b/src/Text/Pandoc/Readers/LaTeX.hs @@ -1798,7 +1798,14 @@ blockCommands = M.fromList , ("address", mempty <$ (skipopts *> tok >>= addMeta "address")) , ("signature", mempty <$ (skipopts *> authors)) , ("date", mempty <$ (skipopts *> tok >>= addMeta "date")) - -- Koma-script metadata commands + -- KOMA-Script metadata commands + , ("extratitle", mempty <$ (skipopts *> tok >>= addMeta "extratitle")) + , ("frontispiece", mempty <$ (skipopts *> tok >>= addMeta "frontispiece")) + , ("titlehead", mempty <$ (skipopts *> tok >>= addMeta "titlehead")) + , ("subject", mempty <$ (skipopts *> tok >>= addMeta "subject")) + , ("publishers", mempty <$ (skipopts *> tok >>= addMeta "publishers")) + , ("uppertitleback", mempty <$ (skipopts *> tok >>= addMeta "uppertitleback")) + , ("lowertitleback", mempty <$ (skipopts *> tok >>= addMeta "lowertitleback")) , ("dedication", mempty <$ (skipopts *> tok >>= addMeta "dedication")) -- sectioning , ("part", section nullAttr (-1)) -- cgit v1.2.3