Commit d0abbf28 authored by João Távora's avatar João Távora

Consider jit-lock-antiblink when fontifying "on demand"

* lisp/jit-lock.el (jit-lock-function): Consider
parent 7ad83a6a
Pipeline #2386 failed with stage
in 90 minutes and 1 second
...@@ -362,7 +362,11 @@ is active." ...@@ -362,7 +362,11 @@ is active."
(or (not (eq jit-lock-defer-time 0)) (or (not (eq jit-lock-defer-time 0))
(input-pending-p)))) (input-pending-p))))
;; No deferral. ;; No deferral.
(jit-lock-fontify-now start (+ start jit-lock-chunk-size)) (if jit-lock--antiblink-grace-timer
;; If we're in the `jit-lock--antiblink-grace', do it only
;; until line end
(jit-lock-fontify-now start (line-end-position))
(jit-lock-fontify-now start (+ start jit-lock-chunk-size)))
;; Record the buffer for later fontification. ;; Record the buffer for later fontification.
(unless (memq (current-buffer) jit-lock-defer-buffers) (unless (memq (current-buffer) jit-lock-defer-buffers)
(push (current-buffer) jit-lock-defer-buffers)) (push (current-buffer) jit-lock-defer-buffers))
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment