Mercurial > emacs

comparison lisp/vc-rcs.el @ 48282:0cae7bc9a8b8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(vc-rcs-registered): Improve comment.
author André Spiegel <spiegel@gnu.org>
date Wed, 13 Nov 2002 12:38:20 +0000
parents b05233e8524d
children a327c58de610
comparison
equal deleted inserted replaced
48281:b8e04fa0ebdf 48282:0cae7bc9a8b8
3 ;; Copyright (C) 1992,93,94,95,96,97,98,99,2000,2001 Free Software Foundation, Inc. 3 ;; Copyright (C) 1992,93,94,95,96,97,98,99,2000,2001 Free Software Foundation, Inc.
4 4
5 ;; Author: FSF (see vc.el for full credits) 5 ;; Author: FSF (see vc.el for full credits)
6 ;; Maintainer: Andre Spiegel <spiegel@gnu.org> 6 ;; Maintainer: Andre Spiegel <spiegel@gnu.org>
7 7
8 ;; $Id: vc-rcs.el,v 1.29 2002/10/08 20:23:36 monnier Exp $ 8 ;; $Id: vc-rcs.el,v 1.30 2002/11/12 19:46:47 rost 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
97 97
98 ;;; 98 ;;;
99 ;;; State-querying functions 99 ;;; State-querying functions
100 ;;; 100 ;;;
101 101
102 ;;; The definition should be at beginning of line (for Help and etags). 102 ;;; The autoload cookie below places vc-rcs-registered directly into
103 ;;;###autoload(defun vc-rcs-registered (f) (vc-default-registered 'RCS f)) 103 ;;; loaddefs.el, so that vc-rcs.el does not need to be loaded for
104 ;;; every file that is visited. The definition is repeated below
105 ;;; so that Help and etags can find it.
106
107 ;;;###autoload (defun vc-rcs-registered (f) (vc-default-registered 'RCS f))
104 (defun vc-rcs-registered (f) (vc-default-registered 'RCS f)) 108 (defun vc-rcs-registered (f) (vc-default-registered 'RCS f))
105 109
106 (defun vc-rcs-state (file) 110 (defun vc-rcs-state (file)
107 "Implementation of `vc-state' for RCS." 111 "Implementation of `vc-state' for RCS."
108 (or (boundp 'vc-rcs-headers-result) 112 (or (boundp 'vc-rcs-headers-result)