1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-03 20:24:29 +00:00

(vc-file-not-found-hook): Call vc-file-clearprops.

This commit is contained in:
Richard M. Stallman 1998-08-08 07:11:40 +00:00
parent 8477026148
commit 5f42a1d493

View File

@ -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