# HG changeset patch # User Glenn Morris # Date 1228289905 0 # Node ID 9512869150598622290e694c5ddf95e321ed2510 # Parent a5dc2e77b96079d2858e81748de7a8fa7a03552f Set maintainer as FSF rather than "None". (vc-mcvs-diff-switches): Doc fix. diff -r a5dc2e77b960 -r 951286915059 lisp/vc-mcvs.el --- a/lisp/vc-mcvs.el Wed Dec 03 07:37:39 2008 +0000 +++ b/lisp/vc-mcvs.el Wed Dec 03 07:38:25 2008 +0000 @@ -1,9 +1,10 @@ ;;; vc-mcvs.el --- VC backend for the Meta-CVS version-control system -;; Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008 +;; Free Software Foundation, Inc. ;; Author: FSF (see vc.el for full credits) -;; Maintainer: None +;; Maintainer: FSF ;; This file is part of GNU Emacs. @@ -64,9 +65,7 @@ "Global switches to pass to any Meta-CVS command." :type '(choice (const :tag "None" nil) (string :tag "Argument String") - (repeat :tag "Argument List" - :value ("") - string)) + (repeat :tag "Argument List" :value ("") string)) :version "22.1" :group 'vc) @@ -83,12 +82,12 @@ :group 'vc) (defcustom vc-mcvs-diff-switches nil - "A string or list of strings specifying extra switches for cvs diff under VC." - :type '(choice (const :tag "None" nil) + "String or list of strings specifying switches for Meta-CVS diff under VC. +If nil, use the value of `vc-diff-switches'. If t, use no switches." + :type '(choice (const :tag "Unspecified" nil) + (const :tag "None" t) (string :tag "Argument String") - (repeat :tag "Argument List" - :value ("") - string)) + (repeat :tag "Argument List" :value ("") string)) :version "22.1" :group 'vc) @@ -184,6 +183,7 @@ ;;; State-changing functions ;;; +;; FIXME the doc is wrong re switches. (defun vc-mcvs-register (files &optional rev comment) "Register FILES into the Meta-CVS version-control system. COMMENT can be used to provide an initial description of FILE.