From da4c9778fbfa26d964bb0761fd9ab45e7f364f95 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 20 Jul 2007 03:56:53 +0000 Subject: [PATCH] (vc-(m)cvs-create-repo): Remove. --- lisp/ChangeLog | 3 +++ lisp/vc-cvs.el | 4 ---- lisp/vc-mcvs.el | 4 ---- 3 files changed, 3 insertions(+), 8 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 079e14914b3..d91e23da97b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2007-07-20 Stefan Monnier + * vc-mcvs.el (vc-mcvs-create-repo): + * vc-cvs.el (vc-cvs-create-repo): Remove. + * vc-hooks.el (vc-find-root): Fix case where `file' is the current directory and the root as well. diff --git a/lisp/vc-cvs.el b/lisp/vc-cvs.el index 588ff4be6ba..2daf2f72fba 100644 --- a/lisp/vc-cvs.el +++ b/lisp/vc-cvs.el @@ -281,10 +281,6 @@ committed and support display of sticky tags." ;;; State-changing functions ;;; -(defun vc-cvs-create-repo () - "Create a new CVS repository." - (error "Creation of CVS repositories is not supported.")) - (defun vc-cvs-register (files &optional rev comment) "Register FILES into the CVS version-control system. COMMENT can be used to provide an initial description of FILES. diff --git a/lisp/vc-mcvs.el b/lisp/vc-mcvs.el index 928f2978ec1..debdf892183 100644 --- a/lisp/vc-mcvs.el +++ b/lisp/vc-mcvs.el @@ -207,10 +207,6 @@ This is only meaningful if you don't use the implicit checkout model ;;; State-changing functions ;;; -(defun vc-mcvs-create-repo () - "Create a new Meta-CVS repository." - (error "Creation of Meta-CVS repositories is not supported.")) - (defun vc-mcvs-register (files &optional rev comment) "Register FILES into the Meta-CVS version-control system. COMMENT can be used to provide an initial description of FILE. -- 2.39.2