Mercurial > emacs
changeset 31808:25632a490236
(vc-name): Force correct computation of the value in case it is missing.
author | André Spiegel <spiegel@gnu.org> |
---|---|
date | Thu, 21 Sep 2000 13:15:26 +0000 |
parents | db5ea3d2a1b4 |
children | a2c432c6b343 |
files | lisp/vc-hooks.el |
diffstat | 1 files changed, 5 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/vc-hooks.el Thu Sep 21 11:49:09 2000 +0000 +++ b/lisp/vc-hooks.el Thu Sep 21 13:15:26 2000 +0000 @@ -5,7 +5,7 @@ ;; Author: FSF (see vc.el for full credits) ;; Maintainer: Andre Spiegel <spiegel@gnu.org> -;; $Id: vc-hooks.el,v 1.118 2000/09/06 10:41:10 gerd Exp $ +;; $Id: vc-hooks.el,v 1.119 2000/09/12 13:00:30 fx Exp $ ;; This file is part of GNU Emacs. @@ -289,7 +289,10 @@ ;; TODO: This should ultimately become obsolete, at least up here ;; in vc-hooks. (or (vc-file-getprop file 'vc-name) - (if (vc-backend file) + ;; force computation of the property by calling + ;; vc-BACKEND-registered explicitly + (if (and (vc-backend file) + (vc-call-backend (vc-backend file) 'registered file)) (vc-file-getprop file 'vc-name)))) (defun vc-checkout-model (file)