diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/Text/Pandoc/Writers/LaTeX.hs | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Writers/LaTeX.hs b/src/Text/Pandoc/Writers/LaTeX.hs index 9f5f6ed69..2c71e689a 100644 --- a/src/Text/Pandoc/Writers/LaTeX.hs +++ b/src/Text/Pandoc/Writers/LaTeX.hs @@ -179,7 +179,8 @@ pandocToLaTeX options (Pandoc meta blocks) = do main <- blockListToLaTeX blocks''' biblioTitle <- inlineListToLaTeX lastHeader st <- get - titleMeta <- stringToLaTeX TextString $ stringify $ docTitle meta + titleMeta <- escapeCommas <$> -- see #10501 + stringToLaTeX TextString (stringify $ docTitle meta) authorsMeta <- mapM (stringToLaTeX TextString . stringify) $ docAuthors meta -- The trailer ID is as hash used to identify the PDF. Taking control of its -- value is important when aiming for reproducible PDF generation. Setting @@ -301,6 +302,10 @@ pandocToLaTeX options (Pandoc meta blocks) = do Nothing -> main Just tpl -> renderTemplate tpl context' +-- Commas in title-meta need to be put in braces; see #10501 +escapeCommas :: Text -> Text +escapeCommas = T.replace "," "{,}" + toSlides :: PandocMonad m => [Block] -> LW m [Block] toSlides bs = do opts <- gets stOptions |