emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals-release/org a62da70: oc-csl: Fix location of \citeproci


From: ELPA Syncer
Subject: [elpa] externals-release/org a62da70: oc-csl: Fix location of \citeprocitem definition
Date: Wed, 8 Dec 2021 06:57:28 -0500 (EST)

branch: externals-release/org
commit a62da701b45a9c88d9182ec2ab5f5641713ef8cf
Author: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Commit: Nicolas Goaziou <mail@nicolasgoaziou.fr>

    oc-csl: Fix location of \citeprocitem definition
    
    * lisp/oc-csl.el (org-cite-csl-finalizer): Insert \citeprocitem before
    "\begin{document}".
---
 lisp/oc-csl.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/oc-csl.el b/lisp/oc-csl.el
index 7f078d1..a92ea8a 100644
--- a/lisp/oc-csl.el
+++ b/lisp/oc-csl.el
@@ -605,10 +605,10 @@ property list."
     (with-temp-buffer
       (save-excursion (insert output))
       (when (search-forward "\\begin{document}" nil t)
-        ;; Ensure that \citeprocitem is defined for citeproc-el
+        (goto-char (match-beginning 0))
+        ;; Ensure that \citeprocitem is defined for citeproc-el.
         (insert 
"\\makeatletter\n\\newcommand{\\citeprocitem}[2]{\\hyper@linkstart{cite}{citeproc_bib_item_#1}#2\\hyper@linkend}\n\\makeatother\n\n")
         ;; Ensure there is a \usepackage{hanging} somewhere or add one.
-        (goto-char (match-beginning 0))
         (let ((re (rx "\\usepackage" (opt "[" (*? nonl) "]") "{hanging}")))
           (unless (re-search-backward re nil t)
             (insert "\\usepackage[notquote]{hanging}\n"))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]