mirrors
/
org-mode
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git
0
0
Fork 1
Code Releases Activity

Merge branch 'bugfix'

This commit is contained in:
Nicolas Goaziou 2021-11-03 17:50:13 +01:00
parent 975462e653 4e185becbf
commit e4ee04eeae
1 changed files with 1 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lisp/oc-basic.el
View File

@ -619,15 +619,7 @@ export communication channel, as a property list."
;; When using this style on citations with multiple references,
;; use global affixes and ignore local ones.
(`(,(or "numeric" "nb") . ,_)
(let* ((references (org-cite-get-references citation))
(prefix
(or (org-element-property :prefix citation)
(and (= 1 (length references))
(org-element-property :prefix (car references)))))
(suffix
(or (org-element-property :suffix citation)
(and (= 1 (length references))
(org-element-property :suffix (car references))))))
(pcase-let ((`(,prefix . ,suffix) (org-cite-main-affixes citation)))
(org-export-data
(org-cite-concat
"(" prefix (org-cite-basic--citation-numbers citation info) suffix ")")