Function: ediff-set-fine-overlays-for-combined-merge

ediff-set-fine-overlays-for-combined-merge is a byte-compiled function defined in ediff-diff.el.gz.

Signature

(ediff-set-fine-overlays-for-combined-merge DIFF-LIST REG-NUM)

Source Code

;; Defined in /usr/src/emacs/lisp/vc/ediff-diff.el.gz
;; Set overlays over the regions that denote delimiters
(defun ediff-set-fine-overlays-for-combined-merge (diff-list reg-num)
  (let (overlay overlay-list)
    (while diff-list
      (condition-case nil
	  (setq overlay
		(ediff-make-bullet-proof-overlay
		 (nth 0 diff-list) (nth 1 diff-list) ediff-buffer-C))
	(error ""))
      (setq overlay-list (cons overlay overlay-list))
      (if (> (length diff-list) 1)
	  (setq diff-list (cdr (cdr diff-list)))
        (error "Corrupt list of delimiter regions")))
    (setq overlay-list (reverse overlay-list))
    (ediff-set-fine-diff-vector
     reg-num 'C (apply #'vector overlay-list))))