Explorar o código

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

* lisp/oc-bibtex.el (org-cite-bibtex-export-citation): Call
`org-cite-main-affixes'.
Nicolas Goaziou %!s(int64=3) %!d(string=hai) anos
pai
achega
e0bbfe63a4
Modificáronse 1 ficheiros con 1 adicións e 5 borrados
  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)))
                 ""))