浏览代码

Allow dashes and underscores in bibtex citation keys

* contrib/lisp/org-exp-bibtex.el (org-export-bibtex-preprocess): Allow
dashes and underscores in bibtex citation keys.

TINYCHANGE

Patch by Nik Putnam
Carsten Dominik 13 年之前
父节点
当前提交
c18896841e
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      contrib/lisp/org-exp-bibtex.el

+ 1 - 1
contrib/lisp/org-exp-bibtex.el

@@ -102,7 +102,7 @@
 	    (save-match-data
 	    (save-match-data
 	      (insert-file-contents (concat file ".html"))
 	      (insert-file-contents (concat file ".html"))
 	      (goto-char (point-min))
 	      (goto-char (point-min))
-	      (while (re-search-forward "a name=\"\\(\\w+\\)\">\\(\\w+\\)" nil t)
+	      (while (re-search-forward (org-re "a name=\"\\([-_[:word:]]+\\)\">\\([[:word:]]+\\)") nil t)
 		(setq oebp-cite-plist (cons (cons (match-string 1) (match-string 2)) oebp-cite-plist)))
 		(setq oebp-cite-plist (cons (cons (match-string 1) (match-string 2)) oebp-cite-plist)))
 	      (goto-char (point-min))
 	      (goto-char (point-min))
 	      (while (re-search-forward "<hr>" nil t)
 	      (while (re-search-forward "<hr>" nil t)