From 4fabcbfbcd8447351ae59b01b329a0dabebea872 Mon Sep 17 00:00:00 2001 From: Alan Mackenzie Date: Sat, 4 Apr 2015 10:26:31 +0000 Subject: Fix debbugs#20240 part two (jit-lock error during `comment-dwim'). jit-lock.el (jit-lock-after-change): Widen the buffer before putting 'fontified text properties. --- lisp/jit-lock.el | 14 ++++++++------ 1 file changed, 8 insertions(+), 6 deletions(-) (limited to 'lisp/jit-lock.el') diff --git a/lisp/jit-lock.el b/lisp/jit-lock.el index 0faabeb879a..d5651c62811 100644 --- a/lisp/jit-lock.el +++ b/lisp/jit-lock.el @@ -650,12 +650,14 @@ will take place when text is fontified stealthily." (let ((jit-lock-start start) (jit-lock-end end)) (with-buffer-prepared-for-jit-lock - (run-hook-with-args 'jit-lock-after-change-extend-region-functions - start end old-len) - ;; Make sure we change at least one char (in case of deletions). - (setq jit-lock-end (min (max jit-lock-end (1+ start)) (point-max))) - ;; Request refontification. - (put-text-property jit-lock-start jit-lock-end 'fontified nil)) + (save-restriction + (widen) + (run-hook-with-args 'jit-lock-after-change-extend-region-functions + start end old-len) + ;; Make sure we change at least one char (in case of deletions). + (setq jit-lock-end (min (max jit-lock-end (1+ start)) (point-max))) + ;; Request refontification. + (put-text-property jit-lock-start jit-lock-end 'fontified nil))) ;; Mark the change for deferred contextual refontification. (when jit-lock-context-unfontify-pos (setq jit-lock-context-unfontify-pos -- cgit v1.2.3