Mercurial > emacs
changeset 50999:c09edac18f97
(completion-ignored-extensions): Add .svn.
(vc-svn-delete-file): New function.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Wed, 14 May 2003 19:38:39 +0000 |
| parents | e37bc45a2001 |
| children | 72af65197e01 |
| files | lisp/vc-svn.el |
| diffstat | 1 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/vc-svn.el Wed May 14 18:57:05 2003 +0000 +++ b/lisp/vc-svn.el Wed May 14 19:38:39 2003 +0000 @@ -1,6 +1,6 @@ ;;; vc-svn.el --- non-resident support for Subversion version-control -;; Copyright (C) 1995,98,99,2000,2001,2002 Free Software Foundation, Inc. +;; Copyright (C) 1995,98,99,2000,2001,02,2003 Free Software Foundation, Inc. ;; Author: FSF (see vc.el for full credits) ;; Maintainer: Stefan Monnier <monnier@gnu.org> @@ -99,6 +99,9 @@ ;;;###autoload (load "vc-svn") ;;;###autoload (vc-svn-registered f))) +;;;###autoload +(add-to-list 'completion-ignored-extensions ".svn/") + (defun vc-svn-registered (file) "Check if FILE is SVN registered." (when (file-readable-p (expand-file-name ".svn/entries" @@ -246,6 +249,9 @@ (concat "-r" rev)) switches))) +(defun vc-svn-delete-file (file) + (vc-svn-command nil 0 file "remove")) + (defun vc-svn-rename-file (old new) (vc-svn-command nil 0 new "move" (file-relative-name old)))