[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org 14ed651: Merge branch 'bugfix'
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org 14ed651: Merge branch 'bugfix' |
Date: |
Wed, 8 Dec 2021 06:57:29 -0500 (EST) |
branch: externals/org
commit 14ed651db0ef822d1b5491a376b66283da9b9349
Merge: 54534ee a62da70
Author: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Commit: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Merge branch 'bugfix'
---
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 9f17d05..bc3b379 100644
--- a/lisp/oc-csl.el
+++ b/lisp/oc-csl.el
@@ -610,10 +610,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"))))