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

[Andre Spiegel]

Index: emacs/lisp/vc-cvs.el
diff -c emacs/lisp/vc-cvs.el:1.60 emacs/lisp/vc-cvs.el:1.61
*** emacs/lisp/vc-cvs.el:1.60   Fri May  9 10:32:01 2003
--- emacs/lisp/vc-cvs.el        Fri May 23 13:57:29 2003
***************
*** 5,11 ****
  ;; Author:      FSF (see vc.el for full credits)
  ;; Maintainer:  Andre Spiegel <address@hidden>
  
! ;; $Id: vc-cvs.el,v 1.60 2003/05/09 14:32:01 monnier Exp $
  
  ;; This file is part of GNU Emacs.
  
--- 5,11 ----
  ;; Author:      FSF (see vc.el for full credits)
  ;; Maintainer:  Andre Spiegel <address@hidden>
  
! ;; $Id: vc-cvs.el,v 1.61 2003/05/23 17:57:29 spiegel Exp $
  
  ;; This file is part of GNU Emacs.
  
***************
*** 428,438 ****
                                         'implicit)))
                            "-w")
                       "update"
!                      ;; default for verbose checkout: clear the sticky tag so
!                      ;; that the actual update will get the head of the trunk
!                      (if (or (not rev) (eq rev t) (string= rev ""))
!                          "-A"
!                        (concat "-r" rev))
                       switches))))
        (vc-mode-line file)
        (message "Checking out %s...done" filename)))))
--- 428,441 ----
                                         'implicit)))
                            "-w")
                       "update"
!                      (when rev
!                        (unless (eq rev t)
!                          ;; default for verbose checkout: clear the
!                          ;; sticky tag so that the actual update will
!                          ;; get the head of the trunk
!                          (if (string= rev "")
!                              "-A"
!                            (concat "-r" rev))))
                       switches))))
        (vc-mode-line file)
        (message "Checking out %s...done" filename)))))