# HG changeset patch
# User Eric S. Raymond <esr@snark.thyrsus.com>
# Date 1210038094 0
# Node ID 3a091c58b092a5b4747d33b01ac2f88d27003933
# Parent  e8c7fc7ef92b0119fc73836c82be80bd1e67192c
Move a customization variable.

diff -r e8c7fc7ef92b -r 3a091c58b092 lisp/vc-dispatcher.el
--- a/lisp/vc-dispatcher.el	Tue May 06 00:51:56 2008 +0000
+++ b/lisp/vc-dispatcher.el	Tue May 06 01:41:34 2008 +0000
@@ -27,6 +27,8 @@
 ;;; Credits:
 
 ;; Designed and implemented by Eric S. Raymond, originally as part of VC mode.
+;; Stefan Monnier and Dan Nicolaescu contributed substinituial work on the
+;; vc-dir front end.
 
 ;;; Commentary:
 
@@ -87,7 +89,23 @@
 ;; about the semantics of individual states, but mark and unmark commands
 ;; treat all entries with the same state as the currently selected one as 
 ;; a unit.
- 
+
+;; The interface
+;;
+;; The main interface to the lower level is vc-do-command.  This launches a
+;; comand, synchronously or asynchronously, making the output available
+;; in a command log buffer.  Two other functions, (vc-start-annotation) and
+;; (vc-finish-logentry), allow you to associate a command closure with an
+;; abbotation buffer so that when the user confirms the comment the closure
+;; is run (with the comment as part of its context).
+;;
+;; The interface to the upper level has the two main entry points (vc-dir)
+;; and (vc-dispatcher-selection-set) and a couple of convenience functions.
+;; (vc-dir) sets up a dispatcher browsing buffer; (vc-dispatcher-selection-set)
+;; returns a selection set of files, either the marked files in a browsing
+;; buffer or the singleton set consisting of the file visited by the current
+;; buffer (when that is appropriate).
+
 ;; To do:
 ;;
 ;; - vc-dir-kill-dir-status-process should not be specific to dir-status,
@@ -141,6 +159,11 @@
   :type 'boolean
   :group 'vc)
 
+(defcustom vc-suppress-confirm nil
+  "If non-nil, treat user as expert; suppress yes-no prompts on some things."
+  :type 'boolean
+  :group 'vc)
+
 ;; Variables the user doesn't need to know about.
 
 (defvar vc-log-operation nil)
diff -r e8c7fc7ef92b -r 3a091c58b092 lisp/vc.el
--- a/lisp/vc.el	Tue May 06 00:51:56 2008 +0000
+++ b/lisp/vc.el	Tue May 06 01:41:34 2008 +0000
@@ -688,11 +688,6 @@
   "Version-control system in Emacs."
   :group 'tools)
 
-(defcustom vc-suppress-confirm nil
-  "If non-nil, treat user as expert; suppress yes-no prompts on some things."
-  :type 'boolean
-  :group 'vc)
-
 (defcustom vc-initial-comment nil
   "If non-nil, prompt for initial comment when a file is registered."
   :type 'boolean