# HG changeset patch
# User Ralf Angeli <angeli@caeruleus.net>
# Date 1289058989 -3600
# Node ID 898b96cf89b3b4261769035440a4aab47e2cd929
# Parent  1542066c27623717681233024f4315049589d745
RefTeX: Improve matching of bib entries.

diff -r 1542066c2762 -r 898b96cf89b3 lisp/ChangeLog
--- a/lisp/ChangeLog	Sat Nov 06 15:49:29 2010 +0200
+++ b/lisp/ChangeLog	Sat Nov 06 16:56:29 2010 +0100
@@ -1,3 +1,12 @@
+2010-11-06  Ralf Angeli  <angeli@caeruleus.net>
+
+	* textmodes/reftex-cite.el
+	(reftex-extract-bib-entries-from-thebibliography): Match bibitem
+	entries with whitespace after \bibitem.
+	(reftex-create-bibtex-file): Match entries containing numbers and
+	symbol constituents.  Make sure that entries with whitespace at
+	various places are found.
+
 2010-11-05  Christian Millour  <cm@abtela.com>  (tiny change)
 
 	* shell.el (shell-process-popd): Made aware of comint-file-name-prefix.
diff -r 1542066c2762 -r 898b96cf89b3 lisp/textmodes/reftex-cite.el
--- a/lisp/textmodes/reftex-cite.el	Sat Nov 06 15:49:29 2010 +0200
+++ b/lisp/textmodes/reftex-cite.el	Sat Nov 06 16:56:29 2010 +0100
@@ -379,7 +379,7 @@
 					      (split-string
 					       (buffer-substring-no-properties
 						start end)
-					       "[ \t\n\r]*\\\\bibitem\
+					       "[ \t\n\r]*\\\\bibitem[ \t]*\
 \\(\\[[^]]*]\\)*\[ \t]*"))))))
 	      (goto-char end))))))
     (unless entries
@@ -1147,9 +1147,8 @@
            (save-restriction
              (widen)
              (goto-char (point-min))
-             (while (re-search-forward
-                     "^[ \t]*@[a-zA-Z]+[ \t]*{\\([^ \t\r\n]+\\),"
-                     nil t)
+             (while (re-search-forward "^[ \t]*@\\(?:\\w\\|\\s_\\)+[ \t\n\r]*\
+\[{(][ \t\n\r]*\\([^ \t\n\r,]+\\)" nil t)
                (setq key (match-string 1)
                      beg (match-beginning 0)
                      end (progn