[elpa] 159/299: Fix BibTeX-auto-regexp-list.

[Stefan Monnier]

monnier pushed a commit to branch externals/auctex
in repository elpa.

commit edd5db44a6075f05b2947ebc27bbd01c2c0028c3
Author: Mosè Giordano <address@hidden>
Date:   Sat Jul 27 23:17:27 2013 +0200

    Fix BibTeX-auto-regexp-list.
    
    * latex.el (BibTeX-auto-regexp-list): Remove `TeX-token-char' from
    the regexp since cite keys can start with non-letter characters,
    e.g., bibcodes start with year of publication.
---
 ChangeLog |    6 ++++++
 latex.el  |    5 ++---
 2 files changed, 8 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 4e101cf..6f011bc 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2013-07-27  Mos� Giordano  <address@hidden>
+
+       * latex.el (BibTeX-auto-regexp-list): Remove `TeX-token-char' from
+       the regexp since cite keys can start with non-letter characters,
+       e.g., bibcodes start with year of publication.
+
 2013-07-24  Tassilo Horn  <address@hidden>
 
        * latex.el (LaTeX-math-menu-unicode): Enable also on windows
diff --git a/latex.el b/latex.el
index 92978f6..5e16f37 100644
--- a/latex.el
+++ b/latex.el
@@ -1540,9 +1540,8 @@ It will setup BibTeX to store keys in an auto file."
   (setq TeX-master t))
 
 (defvar BibTeX-auto-regexp-list
-  `(("@[Ss][Tt][Rr][Ii][Nn][Gg]" 1 ignore)
-    (,(concat "@[a-zA-Z]+[{(][ \t]*\\(" TeX-token-char "[^, 
\n\r\t%\"#'()={}]*\\)")
-     1 LaTeX-auto-bibitem))
+  '(("@[Ss][Tt][Rr][Ii][Nn][Gg]" 1 ignore)
+    ("@[a-zA-Z]+[{(][ \t]*\\([^, \n\r\t%\"#'()={}]*\\)" 1 LaTeX-auto-bibitem)))
   "List of regexp-list expressions matching BibTeX items.")
 
 ;;; Macro Argument Hooks