Function: vc-default-find-revision

vc-default-find-revision is a byte-compiled function defined in vc.el.gz.

Signature

(vc-default-find-revision BACKEND FILE REV BUFFER)

Documentation

Provide the new find-revision op based on the old checkout op.

This is only for compatibility with old backends. They should be updated to provide the find-revision operation instead.

Source Code

;; Defined in /usr/src/emacs/lisp/vc/vc.el.gz
(defun vc-default-find-revision (backend file rev buffer)
  "Provide the new `find-revision' op based on the old `checkout' op.
This is only for compatibility with old backends.  They should be updated
to provide the `find-revision' operation instead."
  (let ((tmpfile (make-temp-file (expand-file-name file))))
    (unwind-protect
	(progn
	  (vc-call-backend backend 'checkout file nil rev tmpfile)
	  (with-current-buffer buffer
	    (insert-file-contents-literally tmpfile)))
      (delete-file tmpfile))))