Mercurial > emacs
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) |