Browse Source

oc-bibtex: Use `org-cite-main-affixes'

* lisp/oc-bibtex.el (org-cite-bibtex-export-citation): Call
`org-cite-main-affixes'.
Nicolas Goaziou 3 years ago
parent
commit
e0bbfe63a4
1 changed files with 1 additions and 5 deletions
  1. 1 5
      lisp/oc-bibtex.el

+ 1 - 5
lisp/oc-bibtex.el

@@ -62,11 +62,7 @@ state, as a property list."
             (pcase style
               (`(,(or "nocite" "n") . ,_) "nocite")
               (_ "cite"))
-            (let ((suffix
-                   (org-element-property :suffix
-                                         (pcase references
-                                           (`(,ref) ref)
-                                           (_ citation)))))
+            (let ((suffix (cdr (org-cite-main-affixes citation))))
               (if suffix
                   (format "[%s]" (org-trim (org-export-data suffix info)))
                 ""))