diff options
| -rw-r--r-- | lisp/vc-rcs.el | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/lisp/vc-rcs.el b/lisp/vc-rcs.el index 77b6be2046c..0d9329fe506 100644 --- a/lisp/vc-rcs.el +++ b/lisp/vc-rcs.el | |||
| @@ -1,13 +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, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, | 3 | ;; Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, |
| 4 | ;; 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 Free Software Foundation, Inc. | 4 | ;; 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 |
| 5 | ;; Free Software Foundation, Inc. | ||
| 5 | 6 | ||
| 6 | ;; Author: FSF (see vc.el for full credits) | 7 | ;; Author: FSF (see vc.el for full credits) |
| 7 | ;; Maintainer: Andre Spiegel <spiegel@gnu.org> | 8 | ;; Maintainer: Andre Spiegel <spiegel@gnu.org> |
| 8 | 9 | ||
| 9 | ;; $Id$ | ||
| 10 | |||
| 11 | ;; This file is part of GNU Emacs. | 10 | ;; This file is part of GNU Emacs. |
| 12 | 11 | ||
| 13 | ;; 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 |
| @@ -58,12 +57,12 @@ by \\[vc-rcs-register]." | |||
| 58 | :group 'vc) | 57 | :group 'vc) |
| 59 | 58 | ||
| 60 | (defcustom vc-rcs-diff-switches nil | 59 | (defcustom vc-rcs-diff-switches nil |
| 61 | "A string or list of strings specifying extra switches for rcsdiff under VC." | 60 | "String or list of strings specifying switches for RCS diff under VC. |
| 62 | :type '(choice (const :tag "None" nil) | 61 | If nil, use the value of `vc-diff-switches'. If t, use no switches." |
| 62 | :type '(choice (const :tag "Unspecified" nil) | ||
| 63 | (const :tag "None" t) | ||
| 63 | (string :tag "Argument String") | 64 | (string :tag "Argument String") |
| 64 | (repeat :tag "Argument List" | 65 | (repeat :tag "Argument List" :value ("") string)) |
| 65 | :value ("") | ||
| 66 | string)) | ||
| 67 | :version "21.1" | 66 | :version "21.1" |
| 68 | :group 'vc) | 67 | :group 'vc) |
| 69 | 68 | ||
| @@ -266,6 +265,7 @@ When VERSION is given, perform check for that version." | |||
| 266 | ;; RCS is totally file-oriented, so all we have to do is make the directory | 265 | ;; RCS is totally file-oriented, so all we have to do is make the directory |
| 267 | (make-directory "RCS")) | 266 | (make-directory "RCS")) |
| 268 | 267 | ||
| 268 | ;; FIXME doc is wrong re switches. | ||
| 269 | (defun vc-rcs-register (files &optional rev comment) | 269 | (defun vc-rcs-register (files &optional rev comment) |
| 270 | "Register FILES into the RCS version-control system. | 270 | "Register FILES into the RCS version-control system. |
| 271 | REV is the optional revision number for the files. COMMENT can be used | 271 | REV is the optional revision number for the files. COMMENT can be used |