Variable: redisplay-highlight-region-function
redisplay-highlight-region-function is a variable defined in
simple.el.gz.
Value
#[128 "\300\301\302#\207"
[apply cua--rectangle-highlight-for-redisplay
#[128 "\300\301\302#\207"
[apply rectangle--highlight-for-redisplay
#[1028 "\301!\204!\302\"!\210\303\304#\210\303\305\306#\210\303\307\310#\210\207\311!p=\2039\312!=\2039\313!=\204@\314p$\210\207"
[redisplay-unhighlight-region-function overlayp make-overlay overlay-put window face region priority
(nil . 100)
overlay-buffer overlay-start overlay-end move-overlay]
9 "\n\n(fn START END WINDOW ROL)"]
nil]
5 nil]
nil]
5 nil]
Documentation
Function to move the region-highlight overlay.
This function is called with four parameters, START, END, WINDOW and OVERLAY. If OVERLAY is nil, a new overlay is created. In any case, the overlay is adjusted to reflect the other three parameters.
The overlay is returned by the function.
Source Code
;; Defined in /usr/src/emacs/lisp/simple.el.gz
(defvar redisplay-highlight-region-function
(lambda (start end window rol)
(if (not (overlayp rol))
(let ((nrol (make-overlay start end)))
(funcall redisplay-unhighlight-region-function rol)
(overlay-put nrol 'window window)
(overlay-put nrol 'face 'region)
;; Normal priority so that a large region doesn't hide all the
;; overlays within it, but high secondary priority so that if it
;; ends/starts in the middle of a small overlay, that small overlay
;; won't hide the region's boundaries.
(overlay-put nrol 'priority '(nil . 100))
nrol)
(unless (and (eq (overlay-buffer rol) (current-buffer))
(eq (overlay-start rol) start)
(eq (overlay-end rol) end))
(move-overlay rol start end (current-buffer)))
rol))
"Function to move the region-highlight overlay.
This function is called with four parameters, START, END, WINDOW
and OVERLAY. If OVERLAY is nil, a new overlay is created. In
any case, the overlay is adjusted to reflect the other three
parameters.
The overlay is returned by the function.")