1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/vc.el b/lisp/vc.el
index 995bcc25692..9757161b7ad 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -1553,7 +1553,7 @@ first backend that could register the file is used."
   (interactive "P")
   (when (and (null fname) (null buffer-file-name)) (error "No visited file"))
 
-  (let ((bname (if fname (get-file-buffer fname) buffer-file-name)))
+  (let ((bname (if fname (get-file-buffer fname) (current-buffer))))
     (unless fname (setq fname buffer-file-name))
     (when (vc-backend fname)
       (if (vc-registered fname)