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

* lisp/oc-bibtex.el (org-cite-bibtex-export-citation): Call `org-cite-main-affixes'.
2021-11-03 16:30:09 +01:00 · 2021-11-03 16:30:09 +01:00 · e0bbfe63a4
parent 498a76857b
commit e0bbfe63a4
1 changed files with 1 additions and 5 deletions
--- a/lisp/oc-bibtex.el
+++ b/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)))
                ""))