From f7aabd88d83b859f9236f4b3e324c87166740926 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Wed, 7 Jun 1995 20:50:55 +0000 Subject: [PATCH] (vc-register): Clean error message if no visited file. --- lisp/vc.el | 2 ++ 1 file changed, 2 insertions(+) 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 -- 2.39.2