# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 764797787 0
# Node ID 8eb722515c314d037d4f75a82418a05afa7f81e5
# Parent  3715d5bfad50af6fba2df76793cdb1dbb67b6d64
(set-visited-file-name): Kill local var vc-mode.
Make buffer writable if was read-only due to vc.

diff -r 3715d5bfad50 -r 8eb722515c31 lisp/files.el
--- a/lisp/files.el	Sun Mar 27 19:46:27 1994 +0000
+++ b/lisp/files.el	Sun Mar 27 19:49:47 1994 +0000
@@ -1184,6 +1184,11 @@
   (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))