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

[André Spiegel]

Index: emacs/lisp/vc.el
diff -c emacs/lisp/vc.el:1.392 emacs/lisp/vc.el:1.393
*** emacs/lisp/vc.el:1.392      Wed Apr 20 16:51:39 2005
--- emacs/lisp/vc.el    Sun May 22 10:51:32 2005
***************
*** 46,52 ****
  
  ;; This mode is fully documented in the Emacs user's manual.
  ;;
! ;; Supported version-control systems presently include SCCS, RCS, and CVS.
  ;;
  ;; Some features will not work with old RCS versions.  Where
  ;; appropriate, VC finds out which version you have, and allows or
--- 46,53 ----
  
  ;; This mode is fully documented in the Emacs user's manual.
  ;;
! ;; Supported version-control systems presently include CVS, RCS, GNU Arch,
! ;; Subversion, Meta-CVS, and SCCS (or its free replacement, CSSC).
  ;;
  ;; Some features will not work with old RCS versions.  Where
  ;; appropriate, VC finds out which version you have, and allows or
***************
*** 68,74 ****
  ;;
  ;; The vc code maintains some internal state in order to reduce expensive
  ;; version-control operations to a minimum.  Some names are only computed
! ;; once.  If you perform version control operations with RCS/SCCS/CVS while
  ;; vc's back is turned, or move/rename master files while vc is running,
  ;; vc may get seriously confused.  Don't do these things!
  ;;
--- 69,75 ----
  ;;
  ;; The vc code maintains some internal state in order to reduce expensive
  ;; version-control operations to a minimum.  Some names are only computed
! ;; once.  If you perform version control operations with the backend while
  ;; vc's back is turned, or move/rename master files while vc is running,
  ;; vc may get seriously confused.  Don't do these things!
  ;;
***************
*** 737,742 ****
--- 738,744 ----
  ;; functions that operate on RCS revision numbers.  This code should
  ;; also be moved into the backends.  It stays for now, however, since
  ;; it is used in code below.
+ ;;;###autoload
  (defun vc-trunk-p (rev)
    "Return t if REV is a revision on the trunk."
    (not (eq nil (string-match "\\`[0-9]+\\.[0-9]+\\'" rev))))