[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r112579: * progmodes/octave.el (octav
From: |
Leo Liu |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r112579: * progmodes/octave.el (octave-font-lock-texinfo-comment): |
Date: |
Tue, 14 May 2013 18:11:56 +0800 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 112579
committer: Leo Liu <address@hidden>
branch nick: trunk
timestamp: Tue 2013-05-14 18:11:56 +0800
message:
* progmodes/octave.el (octave-font-lock-texinfo-comment):
Fix invalid search bound error: wrong side of point.
modified:
lisp/ChangeLog
lisp/progmodes/octave.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2013-05-14 05:19:29 +0000
+++ b/lisp/ChangeLog 2013-05-14 10:11:56 +0000
@@ -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 <address@hidden>
=== modified file 'lisp/progmodes/octave.el'
--- a/lisp/progmodes/octave.el 2013-05-14 05:19:29 +0000
+++ b/lisp/progmodes/octave.el 2013-05-14 10:11:56 +0000
@@ -1067,7 +1067,8 @@
(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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r112579: * progmodes/octave.el (octave-font-lock-texinfo-comment):,
Leo Liu <=