From 2555cdec34077bd8f6bec119eeb92c42e4b10b3c Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 17 Nov 1993 13:12:29 +0000 Subject: [PATCH] (font-lock-hack-keywords): Handle next-single-property-change returning nil. --- lisp/font-lock.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/font-lock.el b/lisp/font-lock.el index a2b5b7d1c4e..5081874ca90 100644 --- a/lisp/font-lock.el +++ b/lisp/font-lock.el @@ -310,7 +310,7 @@ slow things down!") (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)) -- 2.39.5