# HG changeset patch # User Thien-Thi Nguyen # Date 1203423954 0 # Node ID 8a796568ffce1aef99e750a58eaaec8eaae5d1a9 # Parent 42f58d542f558914828007cd2a16b58797e1b1ab (vc-sccs-root): New func. diff -r 42f58d542f55 -r 8a796568ffce lisp/vc-sccs.el --- a/lisp/vc-sccs.el Tue Feb 19 11:45:54 2008 +0000 +++ b/lisp/vc-sccs.el Tue Feb 19 12:25:54 2008 +0000 @@ -362,6 +362,9 @@ ;;; Internal functions ;;; +(defun vc-sccs-root (dir) + (vc-find-root dir "SCCS" t)) + ;; This function is wrapped with `progn' so that the autoload cookie ;; copies the whole function itself into loaddefs.el rather than just placing ;; a (autoload 'vc-sccs-search-project-dir "vc-sccs") which would not