LaTeX writer: Improve grouping with autocites.

Closes #8088.
This commit is contained in:
John MacFarlane 2022-06-01 23:24:49 -07:00
parent e8be78f91a
commit f53977e295
3 changed files with 10 additions and 3 deletions

View file

@ -171,8 +171,9 @@ citationsToBiblatex inlineListToLaTeX (c:cs)
return $ text cmd <> mconcat groups
where grouper prev cit = case prev of
((CiteGroup oPfx oSfx ids):rest)
| null oSfx && null pfx -> CiteGroup oPfx sfx (cid:ids) : rest
((CiteGroup oPfx [] ids):rest)
| null pfx && null sfx
-> CiteGroup oPfx sfx (cid:ids) : rest
_ -> CiteGroup pfx sfx [cid] : prev
where pfx = citationPrefix cit
sfx = citationSuffix cit

View file

@ -20,7 +20,7 @@
% pandoc -t latex --biblatex
[e.g. @a1;@a2, ch.3 and elsewhere;@a3; but also @a4;@a5]
^D
\autocites[e.g.][ch.3 and elsewhere]{a1,a2}{a3}[but also][]{a4,a5}
\autocites[e.g.][]{a1}[ch.3 and elsewhere]{a2}{a3}[but also][]{a4,a5}
```
```
% pandoc -t latex --biblatex

6
test/command/8088.md Normal file
View file

@ -0,0 +1,6 @@
```
% pandoc -t latex --biblatex
[@first, 1; @second; @third, 3]
^D
\autocites[1]{first}{second}[3]{third}
```