diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el
index 7a0e0c354a2..606a5342086 100644
--- a/lisp/vc/vc.el
+++ b/lisp/vc/vc.el
@@ -4726,9 +4726,8 @@ VCS command to run.
 On a non-distributed version control system, this signals an error.
 It also signals an error in a Bazaar bound branch."
   (interactive "P")
-  (let* ((vc-fileset (vc-deduce-fileset t))
-	 (backend (car vc-fileset)))
-;;;	 (files (cadr vc-fileset)))
+  (let* ((fileset (vc-deduce-fileset t t))
+	 (backend (car fileset)))
     (if (vc-find-backend-function backend 'push)
         (progn (vc-call-backend backend 'push arg)
                ;; FIXME: Ideally we would only clear out the