Function: ediff-mark-if-equal

ediff-mark-if-equal is a byte-compiled function defined in ediff-mult.el.gz.

Signature

(ediff-mark-if-equal FILEINFO1 FILEINFO2)

Source Code

;; Defined in /usr/src/emacs/lisp/vc/ediff-mult.el.gz
;; mark files 1 and 2 as equal, if they are.
;; returns t, if something was marked
(defun ediff-mark-if-equal (fileinfo1 fileinfo2)
  (let ((f1 (car fileinfo1))
	(f2 (car fileinfo2)))
    (if (and (stringp f1) (stringp f2) (ediff-same-contents f1 f2))
	(progn
	  (ediff-set-file-eqstatus fileinfo1 t)
	  (ediff-set-file-eqstatus fileinfo2 t)
	  ))
    ))