(vc-rename-file): After renaming, update VC info and modeline.
Preserve buffer-read-only.
This commit is contained in:
parent
5066676655
commit
4c145b9e93
1 changed files with 4 additions and 1 deletions
|
@ -1727,7 +1727,10 @@ A prefix argument means do not revert the buffer afterwards."
|
|||
(if oldbuf
|
||||
(save-excursion
|
||||
(set-buffer oldbuf)
|
||||
(set-visited-file-name new)
|
||||
(let ((buffer-read-only buffer-read-only))
|
||||
(set-visited-file-name new))
|
||||
(vc-backend new)
|
||||
(vc-mode-line new)
|
||||
(set-buffer-modified-p nil))))
|
||||
;; This had FILE, I changed it to OLD. -- rms.
|
||||
(vc-backend-dispatch old
|
||||
|
|
Loading…
Add table
Reference in a new issue