aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii2025-04-26 17:20:01 +0300
committerEli Zaretskii2025-04-26 17:20:01 +0300
commitf7aad714d2854e3f05d87298776628df1d5bfbb2 (patch)
tree79c8e4ce9d723cbca62619f352ab9531982fe071
parentec8075219da2e3cb676d89db58164f54b079b85d (diff)
downloademacs-f7aad714d2854e3f05d87298776628df1d5bfbb2.tar.gz
emacs-f7aad714d2854e3f05d87298776628df1d5bfbb2.zip
Avoid signaling errors in 'cursor-face-highlight-mode'
* lisp/simple.el (redisplay--update-cursor-face-highlight): Don't go beyond the accessible portion of the buffer. (Bug#77747)
-rw-r--r--lisp/simple.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el
index ee09a6f1b19..486092de2c8 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -7265,7 +7265,7 @@ This variable is similar to `highlight-nonselected-windows'."
7265 (pt (window-point window)) 7265 (pt (window-point window))
7266 (cursor-face (get-text-property pt 'cursor-face))) 7266 (cursor-face (get-text-property pt 'cursor-face)))
7267 (let* ((start (previous-single-property-change 7267 (let* ((start (previous-single-property-change
7268 (1+ pt) 'cursor-face nil (point-min))) 7268 (min (1+ pt) (point-max)) 'cursor-face nil (point-min)))
7269 (end (next-single-property-change 7269 (end (next-single-property-change
7270 pt 'cursor-face nil (point-max))) 7270 pt 'cursor-face nil (point-max)))
7271 (new (redisplay--highlight-overlay-function 7271 (new (redisplay--highlight-overlay-function