Change `dir-status' to not take (and pass) status-buffer.

[bpt/emacs.git] / lisp / vc-rcs.el

diff --git a/lisp/vc-rcs.el b/lisp/vc-rcs.el
index d378584..ac88276 100644 (file)
--- a/lisp/vc-rcs.el
+++ b/lisp/vc-rcs.el
@@ -182,7 +182,7 @@ For a description of possible values, see `vc-check-master-templates'."
         (vc-rcs-state file)))))
 
 ;; XXX Experimental function for the vc-dired replacement.
-(defun vc-rcs-dir-status (dir update-function status-buffer)
+(defun vc-rcs-dir-status (dir update-function)
   ;; XXX: quick hack, there should be a better way to do this,
   ;; but it's not worse than vc-dired :-).
   (let ((flist (vc-expand-dirs (list dir)))
@@ -191,7 +191,7 @@ For a description of possible values, see `vc-check-master-templates'."
       (let ((state (vc-state file))
            (frel (file-relative-name file)))
        (push (list frel state) result)))
-    (funcall update-function result status-buffer)))
+    (funcall update-function result)))
 
 (defun vc-rcs-working-revision (file)
   "RCS-specific version of `vc-working-revision'."