summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/progmodes/project.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/project.el b/lisp/progmodes/project.el
index 4c9b70ce043..abe563bec04 100644
--- a/lisp/progmodes/project.el
+++ b/lisp/progmodes/project.el
@@ -725,7 +725,7 @@ requires quoting, e.g. `\\[quoted-insert]<space>'."
(require 'xref)
(require 'grep)
(let* ((pr (project-current t))
- (default-directory (car (project-roots pr)))
+ (default-directory (project-root pr))
(files
(if (not current-prefix-arg)
(project-files pr)
@@ -757,7 +757,7 @@ pattern to search for."
(interactive (list (project--read-regexp)))
(require 'xref)
(let* ((pr (project-current t))
- (default-directory (car (project-roots pr)))
+ (default-directory (project-root pr))
(files
(project-files pr (cons
(project-root pr)