diff options
| author | Richard M. Stallman <rms@gnu.org> | 1998-08-08 07:11:40 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1998-08-08 07:11:40 +0000 |
| commit | 5f42a1d493427bb21d2c9c043d12b80b89cbd6ca (patch) | |
| tree | a087ed1f1a40dbcf909c7149be088e74dd7bd16b /lisp/vc-hooks.el | |
| parent | 84770261487aba38491e9eb8093f0ef7bb696e93 (diff) | |
| download | emacs-5f42a1d493427bb21d2c9c043d12b80b89cbd6ca.tar.gz | |
(vc-file-not-found-hook): Call vc-file-clearprops.
Diffstat (limited to 'lisp/vc-hooks.el')
| -rw-r--r-- | lisp/vc-hooks.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el index b829b44361a..1b2d78c2a4c 100644 --- a/lisp/vc-hooks.el +++ b/lisp/vc-hooks.el @@ -5,7 +5,7 @@ ;; Author: Eric S. Raymond <esr@snark.thyrsus.com> ;; Maintainer: Andre Spiegel <spiegel@inf.fu-berlin.de> -;; $Id: vc-hooks.el,v 1.109 1998/05/07 21:34:54 rms Exp spiegel $ +;; $Id: vc-hooks.el,v 1.110 1998/05/17 15:33:39 spiegel Exp rms $ ;; This file is part of GNU Emacs. @@ -1119,6 +1119,9 @@ control system name." (defun vc-file-not-found-hook () "When file is not found, try to check it out from RCS or SCCS. Returns t if checkout was successful, nil otherwise." + ;; When a file does not exist, ignore cached info about it + ;; from a previous visit. + (vc-file-clearprops buffer-file-name) (if (and (not vc-ignore-vc-files) (vc-backend buffer-file-name)) (save-excursion |