Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Added procOpts parameter to citeproc call.

Browse source
This commit is contained in:
John MacFarlane 2010-11-27 11:28:11 -08:00
parent 8f1aed168b
commit 219853b05e
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/Text/Pandoc/Biblio.hs
View file

@ -54,7 +54,8 @@ processBiblio cslfile r p
needNt = cits \\ concat ncits needNt = cits \\ concat ncits
in (,) needNt $ getNoteCitations needNt p' in (,) needNt $ getNoteCitations needNt p'
else (,) [] $ queryWith getCitation p' else (,) [] $ queryWith getCitation p'
result = citeproc csl r (setNearNote csl $ map (map toCslCite) grps) result = citeproc procOpts csl r (setNearNote csl $
map (map toCslCite) grps)
cits_map = M.fromList $ zip grps (citations result) cits_map = M.fromList $ zip grps (citations result)
biblioList = map (renderPandoc' csl) (bibliography result) biblioList = map (renderPandoc' csl) (bibliography result)
Pandoc m b = processWith (procInlines $ processCite csl cits_map) p' Pandoc m b = processWith (procInlines $ processCite csl cits_map) p'