diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el
index 64d58265816..119d9d1a6f7 100644
--- a/lisp/vc/vc.el
+++ b/lisp/vc/vc.el
@@ -1030,7 +1030,7 @@ Not supported by all backends."
   "Backends which support `vc-async-checkin'.")
 
 (defmacro vc--with-backend-in-rootdir (desc &rest body)
-  (declare (indent 1) (debug (sexp sexp body)))
+  (declare (indent 1) (debug (sexp body)))
   ;; Intentionally capture `backend' and `rootdir':
   ;; no need to keep repeating them.
   `(let ((backend (vc-deduce-backend))