(vc-svn-register-switches): Doc fix. Add t as option.

(vc-svn-register): Doc fix.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 92cefd19be8e0c827db0250d6cc36ead80e0b0f6..0a37cb343fe17c3393ef7d268685aae82d01c1c0 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,16 @@
 2008-12-04  Glenn Morris  <rgm@gnu.org>
 
+       * vc-cvs.el (vc-cvs-register-switches): Doc fix.  Add t as option.
+       (vc-cvs-register): Doc fix.
+       * vc-mcvs.el (vc-mcvs-register-switches): Doc fix.  Add t as option.
+       (vc-mcvs-register): Doc fix.
+       * vc-rcs.el (vc-rcs-register-switches): Doc fix.  Add t as option.
+       (vc-rcs-register): Doc fix.
+       * vc-sccs.el (vc-sccs-register-switches): Doc fix.  Add t as option.
+       (vc-sccs-register): Doc fix.
+       * vc-svn.el (vc-svn-register-switches): Doc fix.  Add t as option.
+       (vc-svn-register): Doc fix.
+
        * files.el (toggle-read-only): Doc fix.
 
 2008-12-03  Stefan Monnier  <monnier@iro.umontreal.ca>

diff --git a/lisp/vc-svn.el b/lisp/vc-svn.el
index e11ec8f37cb252eece1e47fc0c7b76b7a587821c..9e874d2db006f06fae5c5e837ec2131e4244c5e4 100644 (file)
--- a/lisp/vc-svn.el
+++ b/lisp/vc-svn.el
@@ -52,14 +52,14 @@
   :group 'vc)
 
 (defcustom vc-svn-register-switches nil
-  "Extra switches for registering a file into SVN.
+  "Switches for registering a file into SVN.
 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 "22.1"
   :group 'vc)
 
@@ -256,13 +256,11 @@ RESULT is a list of conses (FILE . STATE) for directory DIR."
   (vc-do-command "*vc*" 0 vc-svn-program '(".")
                 "checkout" (concat "file://" default-directory "SVN")))
 
-;; FIXME doc is wrong re switches.
 (defun vc-svn-register (files &optional rev comment)
   "Register FILES into the SVN version-control system.
 The COMMENT argument is ignored  This does an add but not a commit.
-
-`vc-register-switches' and `vc-svn-register-switches' are passed to
-the SVN command (in that order)."
+Passes either `vc-svn-register-switches' or `vc-register-switches'
+to the SVN command."
   (apply 'vc-svn-command nil 0 files "add" (vc-switches 'SVN 'register)))
 
 (defun vc-svn-responsible-p (file)