Jelajahi Sumber

Merge branch 'maint'

Nicolas Goaziou 11 tahun lalu
induk
melakukan
55bde39d88
1 mengubah file dengan 3 tambahan dan 3 penghapusan
  1. 3 3
      lisp/org-bibtex.el

+ 3 - 3
lisp/org-bibtex.el

@@ -386,9 +386,9 @@ and `org-exclude-tags-from-inheritence'."
 	    (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))))))