Commit 3e3da61f authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(vc-finish-steal): Do vc-resynch-window in the right buffer.

(vc-steal-lock): Delete spurious reference to `configuration'.
parent 29fc1ce9
......@@ -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.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment