changeset 5056:64211dda414c

(font-lock-hack-keywords): Handle next-single-property-change returning nil.
author Richard M. Stallman <rms@gnu.org>
date Wed, 17 Nov 1993 13:12:29 +0000
parents bbe5bba17b10
children d15f5b49f3ea
files lisp/font-lock.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/font-lock.el	Wed Nov 17 11:25:53 1993 +0000
+++ b/lisp/font-lock.el	Wed Nov 17 13:12:29 1993 +0000
@@ -310,7 +310,7 @@
 		    (narrow-to-region s e)
 		    (while (not (eobp))
 		      (let ((next (next-single-property-change (point) 'face)))
-			(if (> next (point-max))
+			(if (or (null next) (> next (point-max)))
 			    (setq next (point-max)))
 			(if (not (get-text-property (point) 'face))
 			    (put-text-property (point) next 'face face))