aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2004-09-07 04:48:04 +0000
committerStefan Monnier2004-09-07 04:48:04 +0000
commitfa63cb6d0b273629f893abef60ff7eb17100faf5 (patch)
treeae224b15f97090ea69d2506a41d8272553080817
parent0452b6e74515f3251607833a67e0d21727f78b11 (diff)
downloademacs-fa63cb6d0b273629f893abef60ff7eb17100faf5.tar.gz
emacs-fa63cb6d0b273629f893abef60ff7eb17100faf5.zip
Doc fix.
-rw-r--r--lisp/vc-rcs.el9
-rw-r--r--lisp/vc-sccs.el9
2 files changed, 10 insertions, 8 deletions
diff --git a/lisp/vc-rcs.el b/lisp/vc-rcs.el
index ca2958756a4..0a161bb9288 100644
--- a/lisp/vc-rcs.el
+++ b/lisp/vc-rcs.el
@@ -1,11 +1,12 @@
1;;; vc-rcs.el --- support for RCS version-control 1;;; vc-rcs.el --- support for RCS version-control
2 2
3;; Copyright (C) 1992,93,94,95,96,97,98,99,2000,2001 Free Software Foundation, Inc. 3;; Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
4;; 2000, 2001, 2004 Free Software Foundation, Inc.
4 5
5;; Author: FSF (see vc.el for full credits) 6;; Author: FSF (see vc.el for full credits)
6;; Maintainer: Andre Spiegel <spiegel@gnu.org> 7;; Maintainer: Andre Spiegel <spiegel@gnu.org>
7 8
8;; $Id: vc-rcs.el,v 1.39 2004/03/21 15:46:23 spiegel Exp $ 9;; $Id$
9 10
10;; This file is part of GNU Emacs. 11;; This file is part of GNU Emacs.
11 12
@@ -208,7 +209,7 @@ When VERSION is given, perform check for that version."
208 (vc-file-getprop file 'vc-checkout-model))))) 209 (vc-file-getprop file 'vc-checkout-model)))))
209 210
210(defun vc-rcs-workfile-unchanged-p (file) 211(defun vc-rcs-workfile-unchanged-p (file)
211 "RCS-specific implementation of vc-workfile-unchanged-p." 212 "RCS-specific implementation of `vc-workfile-unchanged-p'."
212 ;; Try to use rcsdiff --brief. If rcsdiff does not understand that, 213 ;; Try to use rcsdiff --brief. If rcsdiff does not understand that,
213 ;; do a double take and remember the fact for the future 214 ;; do a double take and remember the fact for the future
214 (let* ((version (concat "-r" (vc-workfile-version file))) 215 (let* ((version (concat "-r" (vc-workfile-version file)))
@@ -786,5 +787,5 @@ variable `vc-rcs-release' is set to the returned value."
786 787
787(provide 'vc-rcs) 788(provide 'vc-rcs)
788 789
789;;; arch-tag: 759b4916-5b0d-431d-b647-b185b8c652cf 790;; arch-tag: 759b4916-5b0d-431d-b647-b185b8c652cf
790;;; vc-rcs.el ends here 791;;; vc-rcs.el ends here
diff --git a/lisp/vc-sccs.el b/lisp/vc-sccs.el
index 1649349e0bd..b691775f63b 100644
--- a/lisp/vc-sccs.el
+++ b/lisp/vc-sccs.el
@@ -1,11 +1,12 @@
1;;; vc-sccs.el --- support for SCCS version-control 1;;; vc-sccs.el --- support for SCCS version-control
2 2
3;; Copyright (C) 1992,93,94,95,96,97,98,99,2000,2001 Free Software Foundation, Inc. 3;; Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
4;; 2000, 2001, 2004 Free Software Foundation, Inc.
4 5
5;; Author: FSF (see vc.el for full credits) 6;; Author: FSF (see vc.el for full credits)
6;; Maintainer: Andre Spiegel <spiegel@gnu.org> 7;; Maintainer: Andre Spiegel <spiegel@gnu.org>
7 8
8;; $Id: vc-sccs.el,v 1.24 2003/09/01 15:45:17 miles Exp $ 9;; $Id$
9 10
10;; This file is part of GNU Emacs. 11;; This file is part of GNU Emacs.
11 12
@@ -150,7 +151,7 @@ For a description of possible values, see `vc-check-master-templates'."
150 'locking) 151 'locking)
151 152
152(defun vc-sccs-workfile-unchanged-p (file) 153(defun vc-sccs-workfile-unchanged-p (file)
153 "SCCS-specific implementation of vc-workfile-unchanged-p." 154 "SCCS-specific implementation of `vc-workfile-unchanged-p'."
154 (zerop (apply 'vc-do-command nil 1 "vcdiff" (vc-name file) 155 (zerop (apply 'vc-do-command nil 1 "vcdiff" (vc-name file)
155 (list "--brief" "-q" 156 (list "--brief" "-q"
156 (concat "-r" (vc-workfile-version file)))))) 157 (concat "-r" (vc-workfile-version file))))))
@@ -397,5 +398,5 @@ If NAME is nil or a version number string it's just passed through."
397 398
398(provide 'vc-sccs) 399(provide 'vc-sccs)
399 400
400;;; arch-tag: d751dee3-d7b3-47e1-95e3-7ae98c052041 401;; arch-tag: d751dee3-d7b3-47e1-95e3-7ae98c052041
401;;; vc-sccs.el ends here 402;;; vc-sccs.el ends here