aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Citeproc.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2021-04-15 17:45:28 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2021-04-17 16:15:14 -0700
commit7a7fefce5ef395f1c88db8b984618a4bd3c7d916 (patch)
tree046b5e657ec443acb0f3952afa6e3c48cbaed2bb /src/Text/Pandoc/Citeproc.hs
parent099ac9985b93befb32e01718e5b242d5c7b4f080 (diff)
downloadpandoc-7a7fefce5ef395f1c88db8b984618a4bd3c7d916.tar.gz
Use document's lang for the lang parameter of citeproc...
even if it differs from localeLanguage. (It is designed to be possible to override the locale language, and this is especially useful when one wants to use the unicode extension syntx, e.g. fr-u-kb.)
Diffstat (limited to 'src/Text/Pandoc/Citeproc.hs')
-rw-r--r--src/Text/Pandoc/Citeproc.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Citeproc.hs b/src/Text/Pandoc/Citeproc.hs
index c9f1806e4..2f4936fa6 100644
--- a/src/Text/Pandoc/Citeproc.hs
+++ b/src/Text/Pandoc/Citeproc.hs
@@ -74,8 +74,7 @@ processCitations (Pandoc meta bs) = do
let linkCites = maybe False truish $ lookupMeta "link-citations" meta
let opts = defaultCiteprocOptions{ linkCitations = linkCites }
- let result = Citeproc.citeproc opts style (localeLanguage locale)
- refs citations
+ let result = Citeproc.citeproc opts style mblang refs citations
mapM_ (report . CiteprocWarning) (resultWarnings result)
let sopts = styleOptions style
let classes = "references" : -- TODO remove this or keep for compatibility?