comparison lisp/vc-rcs.el @ 100171:d42aff5ca541

* align.el: * allout.el: * apropos.el: * arc-mode.el: * autoinsert.el: * avoid.el: * battery.el: * bookmark.el: * buff-menu.el: * calculator.el: * chistory.el: * cmuscheme.el: * comint.el: * compare-w.el: * dabbrev.el: * delim-col.el: * desktop.el: * diff-mode.el: * diff.el: * dired-aux.el: * dired-x.el: * dired.el: * dos-vars.el: * ediff-diff.el: * ediff-help.el: * ediff-init.el: * ediff-merg.el: * ediff-mult.el: * ediff-ptch.el: * ediff-vers.el: * ediff-wind.el: * ediff.el: * emerge.el: * facemenu.el: * faces.el: * ffap.el: * filecache.el: * find-dired.el: * font-core.el: * font-lock.el: * forms.el: * fringe.el: * help-at-pt.el: * hippie-exp.el: * ido.el: * image-file.el: * imenu.el: * indent.el: * info.el: * isearchb.el: * iswitchb.el: * jit-lock.el: * jka-compr.el: * log-edit.el: * lpr.el: * ls-lisp.el: * man.el: * menu-bar.el: * midnight.el: * mouse-sel.el: * mouse.el: * msb.el: * outline.el: * paren.el: * pcmpl-cvs.el: * pcmpl-gnu.el: * pcomplete.el: * pcvs-info.el: * pcvs-parse.el: * printing.el: * ps-mule.el: * ps-print.el: * replace.el: * ruler-mode.el: * saveplace.el: * sb-image.el: * scroll-bar.el: * sha1.el: * shadowfile.el: * shell.el: * sort.el: * speedbar.el: * strokes.el: * tempo.el: * term.el: * terminal.el: * time-stamp.el: * time.el: * tree-widget.el: * type-break.el: * vc-cvs.el: * vc-hg.el: * vc-mcvs.el: * vc-rcs.el: * vc-sccs.el: * vc.el: * view.el: * w32-vars.el: * whitespace.el: * wid-edit.el: Remove leading * from docstrings of defcustoms, deffaces, defconsts and defuns.
author Lute Kamstra <lute@gnu.org>
date Wed, 03 Dec 2008 05:48:14 +0000
parents eb56a710c41c
children 0cc235691369
comparison
equal deleted inserted replaced
100170:86455974b971 100171:d42aff5ca541
36 (eval-when-compile 36 (eval-when-compile
37 (require 'cl) 37 (require 'cl)
38 (require 'vc)) 38 (require 'vc))
39 39
40 (defcustom vc-rcs-release nil 40 (defcustom vc-rcs-release nil
41 "*The release number of your RCS installation, as a string. 41 "The release number of your RCS installation, as a string.
42 If nil, VC itself computes this value when it is first needed." 42 If nil, VC itself computes this value when it is first needed."
43 :type '(choice (const :tag "Auto" nil) 43 :type '(choice (const :tag "Auto" nil)
44 (string :tag "Specified") 44 (string :tag "Specified")
45 (const :tag "Unknown" unknown)) 45 (const :tag "Unknown" unknown))
46 :group 'vc) 46 :group 'vc)
47 47
48 (defcustom vc-rcs-register-switches nil 48 (defcustom vc-rcs-register-switches nil
49 "*Extra switches for registering a file in RCS. 49 "Extra switches for registering a file in RCS.
50 A string or list of strings. These are passed to the checkin program 50 A string or list of strings. These are passed to the checkin program
51 by \\[vc-rcs-register]." 51 by \\[vc-rcs-register]."
52 :type '(choice (const :tag "None" nil) 52 :type '(choice (const :tag "None" nil)
53 (string :tag "Argument String") 53 (string :tag "Argument String")
54 (repeat :tag "Argument List" 54 (repeat :tag "Argument List"
56 string)) 56 string))
57 :version "21.1" 57 :version "21.1"
58 :group 'vc) 58 :group 'vc)
59 59
60 (defcustom vc-rcs-diff-switches nil 60 (defcustom vc-rcs-diff-switches nil
61 "*A string or list of strings specifying extra switches for rcsdiff under VC." 61 "A string or list of strings specifying extra switches for rcsdiff under VC."
62 :type '(choice (const :tag "None" nil) 62 :type '(choice (const :tag "None" nil)
63 (string :tag "Argument String") 63 (string :tag "Argument String")
64 (repeat :tag "Argument List" 64 (repeat :tag "Argument List"
65 :value ("") 65 :value ("")
66 string)) 66 string))
67 :version "21.1" 67 :version "21.1"
68 :group 'vc) 68 :group 'vc)
69 69
70 (defcustom vc-rcs-header (or (cdr (assoc 'RCS vc-header-alist)) '("\$Id\$")) 70 (defcustom vc-rcs-header (or (cdr (assoc 'RCS vc-header-alist)) '("\$Id\$"))
71 "*Header keywords to be inserted by `vc-insert-headers'." 71 "Header keywords to be inserted by `vc-insert-headers'."
72 :type '(repeat string) 72 :type '(repeat string)
73 :version "21.1" 73 :version "21.1"
74 :group 'vc) 74 :group 'vc)
75 75
76 (defcustom vc-rcsdiff-knows-brief nil 76 (defcustom vc-rcsdiff-knows-brief nil
77 "*Indicates whether rcsdiff understands the --brief option. 77 "Indicates whether rcsdiff understands the --brief option.
78 The value is either `yes', `no', or nil. If it is nil, VC tries 78 The value is either `yes', `no', or nil. If it is nil, VC tries
79 to use --brief and sets this variable to remember whether it worked." 79 to use --brief and sets this variable to remember whether it worked."
80 :type '(choice (const :tag "Work out" nil) (const yes) (const no)) 80 :type '(choice (const :tag "Work out" nil) (const yes) (const no))
81 :group 'vc) 81 :group 'vc)
82 82
83 ;;;###autoload 83 ;;;###autoload
84 (defcustom vc-rcs-master-templates 84 (defcustom vc-rcs-master-templates
85 '("%sRCS/%s,v" "%s%s,v" "%sRCS/%s") 85 '("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")
86 "*Where to look for RCS master files. 86 "Where to look for RCS master files.
87 For a description of possible values, see `vc-check-master-templates'." 87 For a description of possible values, see `vc-check-master-templates'."
88 :type '(choice (const :tag "Use standard RCS file names" 88 :type '(choice (const :tag "Use standard RCS file names"
89 '("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")) 89 '("%sRCS/%s,v" "%s%s,v" "%sRCS/%s"))
90 (repeat :tag "User-specified" 90 (repeat :tag "User-specified"
91 (choice string 91 (choice string