Mercurial > emacs

diff lisp/vc-svn.el @ 91956:7bc22dad5f9a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Make sure all backends support vc-BACKEND-root. * vc-hooks.el (vc-find-root): Take optional arg INVERT. If non-nil, reverse the sense of the check. * vc-rcs.el (vc-rcs-root): New func. * vc-cvs.el (vc-cvs-root): New func. * vc-svn.el (vc-svn-root): New func.
author Thien-Thi Nguyen <ttn@gnuvola.org>
date Tue, 19 Feb 2008 11:43:17 +0000
parents 5d58981e6690
children 99f1bbaca4b7
line wrap: on
line diff
--- a/lisp/vc-svn.el	Tue Feb 19 11:25:30 2008 +0000
+++ b/lisp/vc-svn.el	Tue Feb 19 11:43:17 2008 +0000
@@ -532,6 +532,9 @@
   :type 'string
   :group 'vc)
 
+(defun vc-svn-root (dir)
+  (vc-find-root dir vc-svn-admin-directory t))
+
 (defun vc-svn-command (buffer okstatus file-or-list &rest flags)
   "A wrapper around `vc-do-command' for use in vc-svn.el.
 The difference to vc-do-command is that this function always invokes `svn',