[Emacs-diffs] Changes to emacs/lisp/vc.el

[Stefan Monnier]

Index: emacs/lisp/vc.el
diff -c emacs/lisp/vc.el:1.354 emacs/lisp/vc.el:1.355
*** emacs/lisp/vc.el:1.354      Mon May 26 06:33:00 2003
--- emacs/lisp/vc.el    Sat May 31 12:47:57 2003
***************
*** 7,13 ****
  ;; Maintainer: Andre Spiegel <address@hidden>
  ;; Keywords: tools
  
! ;; $Id: vc.el,v 1.354 2003/05/26 10:33:00 spiegel Exp $
  
  ;; This file is part of GNU Emacs.
  
--- 7,13 ----
  ;; Maintainer: Andre Spiegel <address@hidden>
  ;; Keywords: tools
  
! ;; $Id: vc.el,v 1.355 2003/05/31 16:47:57 monnier Exp $
  
  ;; This file is part of GNU Emacs.
  
***************
*** 62,68 ****
  ;; to be installed somewhere on Emacs's path for executables.
  ;;
  ;; If your site uses the ChangeLog convention supported by Emacs, the
! ;; function vc-comment-to-change-log should prove a useful checkin hook.
  ;;
  ;; The vc code maintains some internal state in order to reduce expensive
  ;; version-control operations to a minimum.  Some names are only computed
--- 62,70 ----
  ;; to be installed somewhere on Emacs's path for executables.
  ;;
  ;; If your site uses the ChangeLog convention supported by Emacs, the
! ;; function log-edit-comment-to-change-log could prove a useful checkin hook,
! ;; although you might prefer to use C-c C-a (i.e. log-edit-insert-changelog)
! ;; from the commit buffer instead or to set `log-edit-setup-invert'.
  ;;
  ;; The vc code maintains some internal state in order to reduce expensive
  ;; version-control operations to a minimum.  Some names are only computed
***************
*** 518,524 ****
    :group 'vc
    :version "20.3")
  
! (defcustom vc-directory-exclusion-list '("SCCS" "RCS" "CVS")
    "*List of directory names to be ignored when walking directory trees."
    :type '(repeat string)
    :group 'vc)
--- 520,526 ----
    :group 'vc
    :version "20.3")
  
! (defcustom vc-directory-exclusion-list '("SCCS" "RCS" "CVS" "MCVS" ".svn")
    "*List of directory names to be ignored when walking directory trees."
    :type '(repeat string)
    :group 'vc)
***************
*** 558,566 ****
  ;;;###autoload
  (defcustom vc-checkin-hook nil
    "*Normal hook (list of functions) run after a checkin is done.
! See `run-hooks'."
    :type 'hook
!   :options '(vc-comment-to-change-log)
    :group 'vc)
  
  ;;;###autoload
--- 560,568 ----
  ;;;###autoload
  (defcustom vc-checkin-hook nil
    "*Normal hook (list of functions) run after a checkin is done.
! See also `log-edit-done-hook'."
    :type 'hook
!   :options '(log-edit-comment-to-change-log)
    :group 'vc)
  
  ;;;###autoload