From: Karl Heuer <kwzh@gnu.org>
Date: Wed, 7 Jun 1995 20:50:55 +0000 (+0000)
Subject: (vc-register): Clean error message if no visited file.
X-Git-Tag: emacs-19.34~3751
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f7aabd88d83b859f9236f4b3e324c87166740926;p=emacs.git

(vc-register): Clean error message if no visited file.
---

diff --git a/lisp/vc.el b/lisp/vc.el
index 54f71fb0d93..c68973505e8 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -640,6 +640,8 @@ merge in the changes into your working copy."
   "Register the current file into your version-control system."
   (interactive "P")
   (let ((master (vc-name buffer-file-name)))
+    (or buffer-file-name
+	(error "No visited file"))
     (and master (file-exists-p master)
 	 (error "This file is already registered"))
     (and master