# HG changeset patch
# User Dan Nicolaescu <dann@ics.uci.edu>
# Date 1199133829 0
# Node ID fd67c20d4a7e2403117612ffbf3c2f5ac9738751
# Parent  de46129c1767278b50969a6dc6e483f170c2300e
(vc-cvs-parse-entry): Set the vc-backend property.

diff -r de46129c1767 -r fd67c20d4a7e lisp/ChangeLog
--- a/lisp/ChangeLog	Mon Dec 31 19:14:24 2007 +0000
+++ b/lisp/ChangeLog	Mon Dec 31 20:43:49 2007 +0000
@@ -1,5 +1,7 @@
 2007-12-31  Dan Nicolaescu  <dann@ics.uci.edu>
 
+	* vc-cvs.el (vc-cvs-parse-entry): Set the vc-backend property.
+
 	* vc.el: State that dir-state is required to set the vc-state and
 	vc-backend properties.
 
diff -r de46129c1767 -r fd67c20d4a7e lisp/vc-cvs.el
--- a/lisp/vc-cvs.el	Mon Dec 31 19:14:24 2007 +0000
+++ b/lisp/vc-cvs.el	Mon Dec 31 20:43:49 2007 +0000
@@ -947,6 +947,7 @@
   (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 'edited)))
@@ -962,6 +963,7 @@
 	     ;; 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)