diff options
author | Nicolas Goaziou <n.goaziou@gmail.com> | 2014-04-20 10:14:03 +0200 |
---|---|---|
committer | Nicolas Goaziou <n.goaziou@gmail.com> | 2014-04-20 10:14:03 +0200 |
commit | c7812ff8a096101bcc5d99f04cdf70782237944c (patch) | |
tree | 1f1a23d4f45a6ee7d5f4c6066df879ed9eb77163 | |
parent | d9312231e96979b4f0855d794959c5442afd975a (diff) | |
download | org-mode-c7812ff8a096101bcc5d99f04cdf70782237944c.tar.gz |
org-bibtex: Tiny code clean-up
* lisp/org-bibtex.el (org-bibtex-headline): Tiny code clean-up.
-rw-r--r-- | lisp/org-bibtex.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/org-bibtex.el b/lisp/org-bibtex.el index dee5389..b655710 100644 --- a/lisp/org-bibtex.el +++ b/lisp/org-bibtex.el @@ -371,9 +371,9 @@ This variable is relevant only if `org-bibtex-tags-are-keywords' is t." (bibtex-beginning-of-entry) (if (re-search-forward "keywords.*=.*{\\(.*\\)}" nil t) (progn (goto-char (match-end 1)) (insert ", ")) - (progn (re-search-forward ",\\(\n\\)" nil t) - (insert " keywords={},\n")) - (re-search-backward "}," nil t)) + (search-forward ",\n" nil t) + (insert " keywords={},\n") + (search-backward "}," nil t)) (insert (mapconcat #'identity tags ", "))) (buffer-string)))))) |