vc-known-roots: Actually update

* lisp/vc/vc-hooks.el (vc-known-roots):
Actually update for the change in 733921edfe (bug#41821).

diff --git a/lisp/vc/vc-hooks.el b/lisp/vc/vc-hooks.el
index 9675c364bb79f7f954415a3272b2b2e1f40cbdb0..46f55358de808dc6641976d5425593016f22fd96 100644 (file)
--- a/lisp/vc/vc-hooks.el
+++ b/lisp/vc/vc-hooks.el
@@ -302,7 +302,7 @@ non-nil if FILE exists and its contents were successfully inserted."
 (declare-function project-try-vc "project")
 (defun vc-known-roots ()
   "Return a list of known vc roots."
-  (seq-filter #'project-try-vc (mapcar #'car (project-known-roots))))
+  (seq-filter #'project-try-vc (project-known-project-roots)))
 
 (defun vc-find-root (file witness)
   "Find the root of a checked out project.