Function: vc-sccs-workfile-unchanged-p

vc-sccs-workfile-unchanged-p is a byte-compiled function defined in vc-sccs.el.gz.

Signature

(vc-sccs-workfile-unchanged-p FILE)

Documentation

Has FILE remained unchanged since last checkout?

Source Code

;; Defined in /usr/src/emacs/lisp/vc/vc-sccs.el.gz
(defun vc-sccs-workfile-unchanged-p (file)
  "Has FILE remained unchanged since last checkout?"
  (let ((tempfile (make-temp-file "vc-sccs")))
    (unwind-protect
	(progn
	  (vc-sccs-write-revision file tempfile (vc-working-revision file))
	  (zerop (vc-do-command "*vc*" 1 "cmp" file tempfile)))
      (delete-file tempfile))))