From dc08a6b5d0e9a9f02843a2bce2e1e5c030c7c1d4 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Andr=C3=A9=20Spiegel?= Date: Thu, 9 Apr 1998 13:45:44 +0000 Subject: [PATCH] (vc-next-action): Fixed bug that prevented registering files using C-x v v. --- lisp/vc.el | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/lisp/vc.el b/lisp/vc.el index 151cee9a6b5..cc9c2608517 100644 --- a/lisp/vc.el +++ b/lisp/vc.el @@ -5,7 +5,7 @@ ;; Author: Eric S. Raymond ;; Maintainer: Andre Spiegel -;; $Id: vc.el,v 1.218 1998/04/05 18:45:06 spiegel Exp spiegel $ +;; $Id: vc.el,v 1.219 1998/04/05 18:54:35 spiegel Exp spiegel $ ;; This file is part of GNU Emacs. @@ -960,8 +960,11 @@ merge in the changes into your working copy." "Enter a change comment for the marked files." 'vc-next-action-dired)) (throw 'nogo nil))) - (vc-ensure-vc-buffer) - (vc-next-action-on-file buffer-file-name verbose))) + (while vc-parent-buffer + (pop-to-buffer vc-parent-buffer)) + (if buffer-file-name + (vc-next-action-on-file buffer-file-name verbose) + (error "Buffer %s is not associated with a file" (buffer-name))))) ;;; These functions help the vc-next-action entry point -- 2.39.2