From: Richard M. Stallman Date: Sun, 27 Mar 1994 19:49:47 +0000 (+0000) Subject: (set-visited-file-name): Kill local var vc-mode. X-Git-Tag: emacs-19.34~9306 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ee81c9594f713db7f6f63c3936274143009581fe;p=emacs.git (set-visited-file-name): Kill local var vc-mode. Make buffer writable if was read-only due to vc. --- diff --git a/lisp/files.el b/lisp/files.el index c4eb7f93207..e3d3bbe2dfb 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -1184,6 +1184,11 @@ if you wish to pass an empty string as the argument." (kill-local-variable 'local-write-file-hooks) (kill-local-variable 'revert-buffer-function) (kill-local-variable 'backup-inhibited) + ;; If buffer was read-only because of version control, + ;; that reason is gone now, so make it writable. + (if vc-mode + (setq buffer-read-only nil)) + (kill-local-variable 'vc-mode) ;; Turn off backup files for certain file names. ;; Since this is a permanent local, the major mode won't eliminate it. (and (not (funcall backup-enable-predicate buffer-file-name))