From: Dmitry Gutov <dgutov@yandex.ru>
Date: Sat, 6 Feb 2021 20:59:00 +0000 (+0200)
Subject: Revert "Fix the previous change"
X-Git-Tag: emacs-28.0.90~3898
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=06e1e5eeacf67b11490431c3d36700a73cf49d88;p=emacs.git

Revert "Fix the previous change"

This reverts commit fc37dc298f27025823fad2d944e11cc7ee6a058d.

That change was only needed in the release branch.
---

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)