From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 24 Sep 1994 01:08:40 +0000 (+0000)
Subject: (vc-finish-steal): Do vc-resynch-window in the right buffer.
X-Git-Tag: emacs-19.34~6809
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3e3da61f356e315476fdb788cc8561034772fc2f;p=emacs.git

(vc-finish-steal): Do vc-resynch-window in the right buffer.
(vc-steal-lock): Delete spurious reference to `configuration'.
---

diff --git a/lisp/vc.el b/lisp/vc.el
index 77101d1615d..7d6f0212fa1 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -599,7 +599,7 @@ level to check it in under.  COMMENT, if specified, is the checkin comment."
     (mail-mode)
     (erase-buffer)
     (mail-setup owner (format "Stolen lock on %s" file-description) nil nil nil
-		(list (list 'vc-finish-steal file rev configuration)))
+		(list (list 'vc-finish-steal file rev)))
     (goto-char (point-max))
     (insert
      (format "I stole the lock on %s, " file-description)
@@ -610,7 +610,10 @@ level to check it in under.  COMMENT, if specified, is the checkin comment."
 ;; This is called when the notification has been sent.
 (defun vc-finish-steal (file version)
   (vc-backend-steal file version)
-  (vc-resynch-window file t t))
+  (if (get-file-buffer file)
+      (save-excursion
+	(set-buffer (get-buffer-file file))
+	(vc-resynch-window file t t))))
 
 (defun vc-checkin (file &optional rev comment)
   "Check in the file specified by FILE.