Function: ediff-region-help-echo

ediff-region-help-echo is a byte-compiled function defined in ediff-init.el.gz.

Signature

(ediff-region-help-echo EXTENT-OR-WINDOW &optional OVERLAY POINT)

Source Code

;; Defined in /usr/src/emacs/lisp/vc/ediff-init.el.gz
(defun ediff-region-help-echo (extent-or-window &optional overlay _point)
  (unless overlay
    (setq overlay extent-or-window))
  (let ((is-current (overlay-get overlay 'ediff))
	(face (overlay-get overlay 'face))
	(diff-num (overlay-get overlay 'ediff-diff-num))
	face-help)

    ;; This happens only for refinement overlays
    (if (stringp face)
	(setq face (intern face)))
    (setq face-help (and face (get face 'ediff-help-echo)))

    (cond ((and is-current diff-num)	; current diff region
	   (format "Difference region %S -- current" (1+ diff-num)))
	  (face-help)			; refinement of current diff region
	  (diff-num			; non-current
	   (format "Difference region %S -- non-current" (1+ diff-num)))
	  (t ""))			; none
    ))