comparison lisp/vc.el @ 35131:9dcb897992b9

(vc-default-latest-on-branch-p): New function, replaces constant implementations in backends.
author André Spiegel <spiegel@gnu.org>
date Mon, 08 Jan 2001 16:23:33 +0000
parents c97a649b1987
children aa38d1de35cb
comparison
equal deleted inserted replaced
35130:9855a80a206a 35131:9dcb897992b9
3 ;; Copyright (C) 1992,93,94,95,96,97,98,2000 Free Software Foundation, Inc. 3 ;; Copyright (C) 1992,93,94,95,96,97,98,2000 Free Software Foundation, Inc.
4 4
5 ;; Author: FSF (see below for full credits) 5 ;; Author: FSF (see below for full credits)
6 ;; Maintainer: Andre Spiegel <spiegel@gnu.org> 6 ;; Maintainer: Andre Spiegel <spiegel@gnu.org>
7 7
8 ;; $Id: vc.el,v 1.290 2000/11/16 18:28:11 monnier Exp $ 8 ;; $Id: vc.el,v 1.292 2000/11/20 14:01:35 spiegel Exp $
9 9
10 ;; This file is part of GNU Emacs. 10 ;; This file is part of GNU Emacs.
11 11
12 ;; GNU Emacs is free software; you can redistribute it and/or modify 12 ;; GNU Emacs is free software; you can redistribute it and/or modify
13 ;; it under the terms of the GNU General Public License as published by 13 ;; it under the terms of the GNU General Public License as published by
836 unchanged)))) 836 unchanged))))
837 837
838 (defun vc-default-workfile-unchanged-p (file) 838 (defun vc-default-workfile-unchanged-p (file)
839 "Default check whether FILE is unchanged: diff against master version." 839 "Default check whether FILE is unchanged: diff against master version."
840 (zerop (vc-call diff file (vc-workfile-version file)))) 840 (zerop (vc-call diff file (vc-workfile-version file))))
841
842 (defun vc-default-latest-on-branch-p (file)
843 "Default check whether the current workfile version of FILE is the
844 latest on its branch."
845 t)
841 846
842 (defun vc-recompute-state (file) 847 (defun vc-recompute-state (file)
843 "Force a recomputation of the version control state of FILE. 848 "Force a recomputation of the version control state of FILE.
844 The state is computed using the exact, and possibly expensive 849 The state is computed using the exact, and possibly expensive
845 function `vc-BACKEND-state', not the heuristic." 850 function `vc-BACKEND-state', not the heuristic."