diff options
| author | John MacFarlane <[email protected]> | 2025-09-27 12:54:44 +0200 |
|---|---|---|
| committer | John MacFarlane <[email protected]> | 2025-09-27 13:07:30 +0200 |
| commit | d6bc9c3cce15af05826554c0238f500bfd7401e4 (patch) | |
| tree | abeef597fd311beb9ba7ec142b9a740c60e73c82 | |
| parent | 95326e21e6502612ddfcadb59714825aead8a70e (diff) | |
LaTeX writer: make beamer footnotes compatible with pauses.
Previously they would appear before the content to which
the note was attached, when there were pauses in a slide.
Closes #5954.
See related discussion in https://github.com/josephwright/beamer/issues/565.
| -rw-r--r-- | src/Text/Pandoc/Writers/LaTeX.hs | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/LaTeX.hs b/src/Text/Pandoc/Writers/LaTeX.hs index 14c8de08a..2892b9757 100644 --- a/src/Text/Pandoc/Writers/LaTeX.hs +++ b/src/Text/Pandoc/Writers/LaTeX.hs @@ -1212,9 +1212,12 @@ inlineToLaTeX (Note contents) = do let noteContents = nest 2 contents' <> optnl beamer <- gets stBeamer -- in beamer slides, display footnote from current overlay forward - -- and ensure that the note is on the frame, not e.g. the column (#5769) + -- and ensure that the note is on the frame, not e.g. the column (#5769, #5954) + incremental <- gets stIncremental let beamerMark = if beamer - then text "<.->[frame]" + then if incremental + then text "<.->[frame]" + else text "<\\value{beamerpauses}->[frame]" else empty if externalNotes then do |