changeset 67897:823f54b91fe2

(bibtex-text-in-field-bounds): Handle case that assoc-string returns nil.
author Roland Winkler <Roland.Winkler@physik.uni-erlangen.de>
date Thu, 29 Dec 2005 17:10:53 +0000
parents 059f4eadf087
children bd49367311fe
files lisp/textmodes/bibtex.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/bibtex.el	Thu Dec 29 17:08:04 2005 +0000
+++ b/lisp/textmodes/bibtex.el	Thu Dec 29 17:10:53 2005 +0000
@@ -1415,9 +1415,9 @@
           (while (< (setq opoint (point)) epoint)
             (if (looking-at bibtex-field-const)
                 (let ((mtch (match-string-no-properties 0)))
-                  (push (if bibtex-expand-strings
-                            (cdr (assoc-string mtch (bibtex-strings) t))
-                          mtch) content)
+                  (push (or (if bibtex-expand-strings
+                                (cdr (assoc-string mtch (bibtex-strings) t)))
+                            mtch) content)
                   (goto-char (match-end 0)))
               (let ((bounds (bibtex-parse-field-string)))
                 (push (buffer-substring-no-properties