diff options
| author | Dan Nicolaescu <dann@ics.uci.edu> | 2008-06-20 17:08:55 +0000 |
|---|---|---|
| committer | Dan Nicolaescu <dann@ics.uci.edu> | 2008-06-20 17:08:55 +0000 |
| commit | 3daebe67ea4d67de8fdc09c72409bcb14e171cb6 (patch) | |
| tree | eeceb296d36e9c5567ea9276cbf83a7cb0ae0280 /lisp/vc-cvs.el | |
| parent | 3114c2523ade375d8c3ac171af23ee8e49f3c819 (diff) | |
| download | emacs-3daebe67ea4d67de8fdc09c72409bcb14e171cb6.tar.gz | |
* vc.el (vc-switch-backend): Simplify.
(Todo): Remove solved items.
* vc-cvs.el (vc-cvs-parse-status, vc-cvs-parse-entry): Do not set
the vc-backend property.
Diffstat (limited to 'lisp/vc-cvs.el')
| -rw-r--r-- | lisp/vc-cvs.el | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/lisp/vc-cvs.el b/lisp/vc-cvs.el index edaf7f08d7c..88d0b717653 100644 --- a/lisp/vc-cvs.el +++ b/lisp/vc-cvs.el @@ -800,7 +800,6 @@ state." (cond ((re-search-forward "\\=\\([^ \t]+\\)" nil t) (setq file (expand-file-name (match-string 1))) - (vc-file-setprop file 'vc-backend 'CVS) (setq status(if (re-search-forward "\\=[ \t]+Status: \\(.*\\)" nil t) (match-string 1) "Unknown")) (when (and full @@ -1042,7 +1041,6 @@ is non-nil." (cond ;; entry for a "locally added" file (not yet committed) ((looking-at "/[^/]+/0/") - (vc-file-setprop file 'vc-backend 'CVS) (vc-file-setprop file 'vc-checkout-time 0) (vc-file-setprop file 'vc-working-revision "0") (if set-state (vc-file-setprop file 'vc-state 'added))) @@ -1058,7 +1056,6 @@ is non-nil." ;; sticky tag "\\(.\\|\\)" ;Sticky tag type (date or tag name, could be empty) "\\(.*\\)")) ;Sticky tag - (vc-file-setprop file 'vc-backend 'CVS) (vc-file-setprop file 'vc-working-revision (match-string 1)) (vc-file-setprop file 'vc-cvs-sticky-tag (vc-cvs-parse-sticky-tag (match-string 4) |