From: Jimmy Aguilar Mena <spacibba@aol.com>
Date: Sun, 13 Mar 2022 20:35:48 +0000 (+0100)
Subject: Rename hook
X-Git-Tag: emacs-29.0.90~1931^2~1002^2~10
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2ce4c038ec27e5fc40a5adf54f7a8498f0692b88;p=emacs.git

Rename hook

* lisp/simple.el (redisplay--update-cursor-property-highlight) : Renamed
to redisplay--update-cursor-property-highlight
---

diff --git a/lisp/simple.el b/lisp/simple.el
index cc356addb97..e20719f7a0f 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -6537,7 +6537,7 @@ The overlay is returned by the function.")
         (unless (equal new rol)
           (set-window-parameter window 'internal-region-overlay new))))))
 
-(defun redisplay--update-cursor-property-highlight (window)
+(defun redisplay--update-cursor-face-highlight (window)
   "This highlights the overlay used to highlight text with cursor-face."
   (let ((rol (window-parameter window 'internal-cursor-face-overlay))
         (pt) (value) (cursor-face))
@@ -6556,7 +6556,7 @@ The overlay is returned by the function.")
       (if rol
           (redisplay-unhighlight-overlay-function rol)))))
 
-(defvar pre-redisplay-functions (list #'redisplay--update-cursor-property-highlight
+(defvar pre-redisplay-functions (list #'redisplay--update-cursor-face-highlight
                                       #'redisplay--update-region-highlight)
   "Hook run just before redisplay.
 It is called in each window that is to be redisplayed.  It takes one argument,