aboutsummaryrefslogtreecommitdiff
path: root/src/Text
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2020-02-03 08:52:07 -0800
committerJohn MacFarlane <jgm@berkeley.edu>2020-02-03 08:52:07 -0800
commitd9b1776336db06306562c4b5648716196261b548 (patch)
treea16cf7242856670c1689b069a81089dc0021d259 /src/Text
parent6371ec241d63e0faf3a181aa4b08fb32ebb2eff1 (diff)
downloadpandoc-d9b1776336db06306562c4b5648716196261b548.tar.gz
Fix duplicate frame classes in LaTeX/Beamer output.
Close #6107.
Diffstat (limited to 'src/Text')
-rw-r--r--src/Text/Pandoc/Writers/LaTeX.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/LaTeX.hs b/src/Text/Pandoc/Writers/LaTeX.hs
index 6155aec59..438b04bc7 100644
--- a/src/Text/Pandoc/Writers/LaTeX.hs
+++ b/src/Text/Pandoc/Writers/LaTeX.hs
@@ -501,8 +501,8 @@ blockToLaTeX (Div (identifier,"slide":dclasses,dkvs)
hasCodeBlock _ = []
let hasCode (Code _ _) = [True]
hasCode _ = []
- let classes = dclasses ++ hclasses
- let kvs = dkvs ++ hkvs
+ let classes = ordNub $ dclasses ++ hclasses
+ let kvs = ordNub $ dkvs ++ hkvs
let fragile = "fragile" `elem` classes ||
not (null $ query hasCodeBlock bs ++ query hasCode bs)
let frameoptions = ["allowdisplaybreaks", "allowframebreaks", "fragile",