comparison lisp/vc-svn.el @ 94519:44d4506fa470

Comment cleanup (no code change).
author Eric S. Raymond <esr@snark.thyrsus.com>
date Thu, 01 May 2008 16:40:14 +0000
parents ad6c174910db
children 2a61c5f918a5
comparison
equal deleted inserted replaced
94518:7bd70b5b8bda 94519:44d4506fa470
298 nil 298 nil
299 ;; Check out a particular version (or recreate the file). 299 ;; Check out a particular version (or recreate the file).
300 (vc-file-setprop file 'vc-working-revision nil) 300 (vc-file-setprop file 'vc-working-revision nil)
301 (apply 'vc-svn-command nil 0 file 301 (apply 'vc-svn-command nil 0 file
302 "update" 302 "update"
303 ;; default for verbose checkout: clear the sticky tag so
304 ;; that the actual update will get the head of the trunk
305 (cond 303 (cond
306 ((null rev) "-rBASE") 304 ((null rev) "-rBASE")
307 ((or (eq rev t) (equal rev "")) nil) 305 ((or (eq rev t) (equal rev "")) nil)
308 (t (concat "-r" rev))) 306 (t (concat "-r" rev)))
309 switches))) 307 switches)))