# HG changeset patch
# User Paul Eggert <eggert@twinsun.com>
# Date 741842412 0
# Node ID 1f3cd46bd29c778c2aa4c5cee88230821dbda209
# Parent  4eada6c0b8d42c80077d30a2589adf2251fc7c64
(vc-name): Move to vc-hooks.el.

diff -r 4eada6c0b8d4 -r 1f3cd46bd29c lisp/vc.el
--- a/lisp/vc.el	Sun Jul 04 21:44:25 1993 +0000
+++ b/lisp/vc.el	Mon Jul 05 03:20:12 1993 +0000
@@ -154,13 +154,6 @@
 
 ;; 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)