Function: vc-sccs-responsible-p

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

Signature

(vc-sccs-responsible-p FILE)

Documentation

Return the directory if SCCS thinks it would be responsible for FILE.

Source Code

;; Defined in /usr/src/emacs/lisp/vc/vc-sccs.el.gz
(defun vc-sccs-responsible-p (file)
  "Return the directory if SCCS thinks it would be responsible for FILE."
  ;; TODO: check for all the patterns in vc-sccs-master-templates
  (or (and (file-directory-p
            (expand-file-name "SCCS" (file-name-directory file)))
           file)
      (let ((dir (vc-sccs-search-project-dir (or (file-name-directory file) "")
					     (file-name-nondirectory file))))
        (and (stringp dir)
             dir))))