summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDmitry Gutov <dgutov@yandex.ru>2021-02-05 01:17:09 +0200
committerDmitry Gutov <dgutov@yandex.ru>2021-02-05 01:17:09 +0200
commitfc37dc298f27025823fad2d944e11cc7ee6a058d (patch)
tree22926cc2d359c221eafe57d08e18c1e8041df266
parentb99848c72cb2570cfcab98443be9156b66dee830 (diff)
downloademacs-fc37dc298f27025823fad2d944e11cc7ee6a058d.tar.gz
Fix the previous change
* lisp/progmodes/project.el (project-find-regexp): Fix the previous change (project-root is not defined in this version). (project-or-external-find-regexp): Same.
-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 2b35ea412f7..ca0755cf8cd 100644
--- a/lisp/progmodes/project.el
+++ b/lisp/progmodes/project.el
@@ -441,7 +441,7 @@ requires quoting, e.g. `\\[quoted-insert]<space>'."
(require 'xref)
(require 'grep)
(let* ((pr (project-current t))
- (default-directory (project-root pr))
+ (default-directory (car (project-roots pr)))
(files
(if (not current-prefix-arg)
(project-files pr (project-roots pr))
@@ -474,7 +474,7 @@ pattern to search for."
(interactive (list (project--read-regexp)))
(require 'xref)
(let* ((pr (project-current t))
- (default-directory (project-root pr))
+ (default-directory (car (project-roots pr)))
(files
(project-files pr (append
(project-roots pr)