Mercurial > emacs
diff lisp/vc.el @ 21448:1b5746e92464
(vc-next-action): Fixed bug that prevented registering files using C-x v v.
| author | André Spiegel <spiegel@gnu.org> |
|---|---|
| date | Thu, 09 Apr 1998 13:45:44 +0000 |
| parents | e8224143df73 |
| children | 4d5cd99a3d51 |
line wrap: on
line diff
--- a/lisp/vc.el Thu Apr 09 12:31:57 1998 +0000 +++ b/lisp/vc.el Thu Apr 09 13:45:44 1998 +0000 @@ -5,7 +5,7 @@ ;; Author: Eric S. Raymond <esr@snark.thyrsus.com> ;; Maintainer: Andre Spiegel <spiegel@inf.fu-berlin.de> -;; $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 @@ "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