(vc-deduce-fileset): Undo previous change, do not tell

vc-responsible-backend to register, it causes problems.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8b352d1f88493180e8dfc45cb52b539f81ff7e2a..4834d05c570310ac1e201f13ff8f8f3d8a57f0cd 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2009-10-21  Dan Nicolaescu  <dann@ics.uci.edu>
+
+       * vc.el (vc-deduce-fileset): Undo previous change, do not tell
+       vc-responsible-backend to register, it causes problems.
+
 2009-10-21  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * help-fns.el: Don't require help-mode (to avoid bootstrap issues).

diff --git a/lisp/vc.el b/lisp/vc.el
index 2d5e325de232da0f314eab9a9aa5913c6f012c65..b939c3520672617c74b40ec07c226afe2ff87af7 100644 (file)
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -933,13 +933,13 @@ current buffer."
      ((and allow-unregistered (not (vc-registered buffer-file-name)))
       (if state-model-only-files
          (list (vc-responsible-backend
-                (file-name-directory (buffer-file-name)) t)
+                (file-name-directory (buffer-file-name)))
                (list buffer-file-name)
                (list buffer-file-name)
                (when state-model-only-files 'unregistered)
                nil)
        (list (vc-responsible-backend
-              (file-name-directory (buffer-file-name)) t)
+              (file-name-directory (buffer-file-name)))
              (list buffer-file-name))))
      (t (error "No fileset is available here")))))