# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1129471653 0
# Node ID cff7c706ba1795957693612ea88af687321b992d
# Parent  8e27f6e245f1a3172c9af55ab25e6f90daf208f1
(bibtex-font-lock-url): Catch when point past bound of search.

diff -r 8e27f6e245f1 -r cff7c706ba17 lisp/textmodes/bibtex.el
--- a/lisp/textmodes/bibtex.el	Sun Oct 16 13:28:59 2005 +0000
+++ b/lisp/textmodes/bibtex.el	Sun Oct 16 14:07:33 2005 +0000
@@ -2662,6 +2662,7 @@
         field bounds start end found)
     (bibtex-beginning-of-field)
     (while (and (not found)
+                (<= (point) bound)
 		(prog1 (re-search-forward bibtex-font-lock-url-regexp bound t)
 		  (setq field (match-string-no-properties 1)))
 		(setq bounds (bibtex-parse-field-text))