Function: vc-find-backend-function

vc-find-backend-function is a byte-compiled function defined in vc-hooks.el.gz.

Signature

(vc-find-backend-function BACKEND FUN)

Documentation

Return BACKEND-specific implementation of FUN.

If there is no such implementation, return the default implementation; if that doesn't exist either, return nil.

Source Code

;; Defined in /usr/src/emacs/lisp/vc/vc-hooks.el.gz
(defun vc-find-backend-function (backend fun)
  "Return BACKEND-specific implementation of FUN.
If there is no such implementation, return the default implementation;
if that doesn't exist either, return nil."
  (let ((f (vc-make-backend-sym backend fun)))
    (if (fboundp f) f
      ;; Load vc-BACKEND.el if needed.
      (require (intern (concat "vc-" (downcase (symbol-name backend)))))
      (if (fboundp f) f
	(let ((def (vc-make-backend-sym 'default fun)))
	  (if (fboundp def) (cons def backend) nil))))))