Mercurial > emacs

comparison lisp/vc-hooks.el @ 52055:8322fd2e3685

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(vc-file-not-found-hook): Brr. Improve last doc fix.
author Markus Rost <rost@math.uni-bielefeld.de>
date Sat, 26 Jul 2003 16:07:25 +0000
parents 72bd55c01245
children 2672198e6a12
comparison
equal deleted inserted replaced
52054:fa723a375898 52055:8322fd2e3685
4 ;; Free Software Foundation, Inc. 4 ;; Free Software Foundation, Inc.
5 5
6 ;; Author: FSF (see vc.el for full credits) 6 ;; Author: FSF (see vc.el for full credits)
7 ;; Maintainer: Andre Spiegel <spiegel@gnu.org> 7 ;; Maintainer: Andre Spiegel <spiegel@gnu.org>
8 8
9 ;; $Id: vc-hooks.el,v 1.154 2003/07/26 13:05:10 spiegel Exp $ 9 ;; $Id: vc-hooks.el,v 1.155 2003/07/26 15:54:53 rost Exp $
10 10
11 ;; This file is part of GNU Emacs. 11 ;; This file is part of GNU Emacs.
12 12
13 ;; GNU Emacs is free software; you can redistribute it and/or modify 13 ;; GNU Emacs is free software; you can redistribute it and/or modify
14 ;; it under the terms of the GNU General Public License as published by 14 ;; it under the terms of the GNU General Public License as published by
740 740
741 ;; more hooks, this time for file-not-found 741 ;; more hooks, this time for file-not-found
742 (defun vc-file-not-found-hook () 742 (defun vc-file-not-found-hook ()
743 "When file is not found, try to check it out from version control. 743 "When file is not found, try to check it out from version control.
744 Returns t if checkout was successful, nil otherwise. 744 Returns t if checkout was successful, nil otherwise.
745 Used in `find-file-not-found-hooks'." 745 Used in `find-file-not-found-functions'."
746 ;; When a file does not exist, ignore cached info about it 746 ;; When a file does not exist, ignore cached info about it
747 ;; from a previous visit. 747 ;; from a previous visit.
748 (vc-file-clearprops buffer-file-name) 748 (vc-file-clearprops buffer-file-name)
749 (if (and (vc-backend buffer-file-name) 749 (if (and (vc-backend buffer-file-name)
750 (yes-or-no-p 750 (yes-or-no-p