* progmodes/octave.el (octave-font-lock-texinfo-comment):

Fix invalid search bound error: wrong side of point.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 803e2772109191719e2ffe87b426384c3affc412..70431b3f3186621db5dd78f2f00cda8783341fe0 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -3,6 +3,8 @@
        * progmodes/octave.el (octave-font-lock-keywords): Fix error
        during redisplay.
        (octave-goto-function-definition, octave-find-definition): Minor tweaks.
+       (octave-font-lock-texinfo-comment): Fix invalid search bound
+       error: wrong side of point.
 
 2013-05-14  Glenn Morris  <rgm@gnu.org>
 

diff --git a/lisp/progmodes/octave.el b/lisp/progmodes/octave.el
index e4e0dbc4ee1ca53422a700571662d862ae78b1be..2fd2aadfc99e732c29a5a41b103c8731a4ce3fac 100644 (file)
--- a/lisp/progmodes/octave.el
+++ b/lisp/progmodes/octave.el
@@ -1067,7 +1067,8 @@ q: Don't fix\n" func file))
     (font-lock-add-keywords
      nil
      `((,(lambda (limit)
-           (while (and (search-forward "-*- texinfo -*-" limit t)
+           (while (and (< (point) limit)
+                       (search-forward "-*- texinfo -*-" limit t)
                        (octave-in-comment-p))
              (let ((beg (nth 8 (syntax-ppss)))
                    (end (progn