comparison lisp/vc-svn.el @ 96257:343227fc64ed

(vc-annotate-parent-rev): Pacify byte compiler. (vc-svn-parse-status): Do not set the vc-backend property.
author Dan Nicolaescu <dann@ics.uci.edu>
date Wed, 25 Jun 2008 03:26:45 +0000
parents 8c22ce277d5d
children 701c14eb5b26
comparison
equal deleted inserted replaced
96256:a56e02fe83fc 96257:343227fc64ed
611 (expand-file-name 611 (expand-file-name
612 (buffer-substring (point) (line-end-position))))) 612 (buffer-substring (point) (line-end-position)))))
613 (setq status (char-after (line-beginning-position))) 613 (setq status (char-after (line-beginning-position)))
614 (if (eq status ??) 614 (if (eq status ??)
615 (vc-file-setprop file 'vc-state 'unregistered) 615 (vc-file-setprop file 'vc-state 'unregistered)
616 ;; `vc-BACKEND-registered' must not set vc-backend,
617 ;; which is instead set in vc-registered.
618 (unless filename (vc-file-setprop file 'vc-backend 'SVN))
619 ;; Use the last-modified revision, so that searching in vc-print-log 616 ;; Use the last-modified revision, so that searching in vc-print-log
620 ;; output works. 617 ;; output works.
621 (vc-file-setprop file 'vc-working-revision (match-string 3)) 618 (vc-file-setprop file 'vc-working-revision (match-string 3))
622 ;; Remember Svn's own status. 619 ;; Remember Svn's own status.
623 (vc-file-setprop file 'vc-svn-status status) 620 (vc-file-setprop file 'vc-svn-status status)