From 7a7fefce5ef395f1c88db8b984618a4bd3c7d916 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Thu, 15 Apr 2021 17:45:28 -0700
Subject: [PATCH] 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.)
---
src/Text/Pandoc/Citeproc.hs | 3 +--
1 file changed, 1 insertion(+), 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?