From: Eric S. Raymond <esr@snark.thyrsus.com>
Date: Mon, 5 May 2008 18:21:27 +0000 (+0000)
Subject: Actually supply needed arguments.
X-Git-Tag: emacs-pretest-23.0.90~5804
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5ebf2aa59c9f33dec5caf7dfaf7b6c95b162b393;p=emacs.git

Actually supply needed arguments.
---

diff --git a/lisp/vc.el b/lisp/vc.el
index 4008b2f80f6..8e9d0469b27 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -2187,11 +2187,11 @@ outside of VC) and one wants to do some operation on it."
   
 (defun vc-generic-state (file)
   (let ((backend (vc-responsible-backend file)))
-    (vc-call-backend backend 'state)))
+    (vc-call-backend backend 'state file)))
   
 (defun vc-generic-status-fileinfo-extra (file)
   (let ((backend (vc-responsible-backend file)))
-    (vc-call-backend backend 'status-fileinfo-extra)))
+    (vc-call-backend backend 'status-fileinfo-extra file)))
 
 (defun vc-generic-dir-headers (dir)
   (let ((backend (vc-responsible-backend dir)))