From 2bd5041b8e26c85cfd56dea9079392da793f215d Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Mon, 5 Jul 1993 03:20:12 +0000 Subject: [PATCH] (vc-name): Move to vc-hooks.el. --- lisp/vc.el | 7 ------- 1 file changed, 7 deletions(-) diff --git a/lisp/vc.el b/lisp/vc.el index b619a7b6abe..830444feee6 100644 --- a/lisp/vc.el +++ b/lisp/vc.el @@ -154,13 +154,6 @@ is sensitive to blank lines.") ;; Random helper functions -(defun vc-name (file) - "Return the master name of a file, nil if it is not registered." - (or (vc-file-getprop file 'vc-name) - (vc-file-setprop file 'vc-name - (let ((name-and-type (vc-registered file))) - (and name-and-type (car name-and-type)))))) - (defun vc-registration-error (file) (if file (error "File %s is not under version control" file) -- 2.39.5