# HG changeset patch # User Glenn Morris # Date 1228374043 0 # Node ID d2b36bcb9a82b799eb8f0aa97bd4a2ae6145e88f # Parent 4e81f7c8bb2c7150c6520dcc794dd8d365a3777f (vc-cvs-register-switches): Doc fix. Add t as option. (vc-cvs-register): Doc fix. diff -r 4e81f7c8bb2c -r d2b36bcb9a82 lisp/vc-cvs.el --- a/lisp/vc-cvs.el Thu Dec 04 06:13:19 2008 +0000 +++ b/lisp/vc-cvs.el Thu Dec 04 07:00:43 2008 +0000 @@ -70,14 +70,14 @@ :group 'vc) (defcustom vc-cvs-register-switches nil - "Extra switches for registering a file into CVS. + "Switches for registering a file into CVS. A string or list of strings passed to the checkin program by -\\[vc-register]." - :type '(choice (const :tag "None" nil) +\\[vc-register]. If nil, use the value of `vc-register-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 "21.1" :group 'vc) @@ -273,13 +273,11 @@ ;;; State-changing functions ;;; -;; FIXME doc is wrong re switches. (defun vc-cvs-register (files &optional rev comment) "Register FILES into the CVS version-control system. COMMENT can be used to provide an initial description of FILES. - -`vc-register-switches' and `vc-cvs-register-switches' are passed to -the CVS command (in that order)." +Passes either `vc-cvs-register-switches' or `vc-register-switches' +to the CVS command." ;; Register the directories if needed. (let (dirs) (dolist (file files)