summaryrefslogtreecommitdiff
path: root/lisp/vc-hooks.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1993-02-24 18:07:12 +0000
committerRichard M. Stallman <rms@gnu.org>1993-02-24 18:07:12 +0000
commitb26c217c091cdc3bcddebd013bb69c6aca0af82c (patch)
tree7bcd1c6447ff4a98b151092ee2aec46e5fc630bb /lisp/vc-hooks.el
parent09dd7e7e4171d73b335978650da91fe1bf5385cf (diff)
downloademacs-b26c217c091cdc3bcddebd013bb69c6aca0af82c.tar.gz
(vc-find-file-hook): Discard vc status of file
if we will actually have to create the buffer.
Diffstat (limited to 'lisp/vc-hooks.el')
-rw-r--r--lisp/vc-hooks.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el
index fc84af99958..f7de918f043 100644
--- a/lisp/vc-hooks.el
+++ b/lisp/vc-hooks.el
@@ -5,7 +5,7 @@
;; Author: Eric S. Raymond <esr@snark.thyrsus.com>
;; Version: 4.0
-;; $Id: vc-hooks.el,v 1.5 1992/10/20 18:43:33 rms Exp rms $
+;; $Id: vc-hooks.el,v 1.6 1992/10/24 20:07:08 rms Exp rms $
;; This file is part of GNU Emacs.
@@ -134,6 +134,9 @@ visiting FILE."
;;; install a call to the above as a find-file hook
(defun vc-find-file-hook ()
+ ;; Recompute whether file is version controlled,
+ ;; if user has killed the buffer and revisited.
+ (vc-file-setprop buffer-file-name 'vc-backend nil)
(if (and (vc-mode-line buffer-file-name) (not vc-make-backup-files))
(progn
(make-local-variable 'make-backup-files)