branch: elpa/dirvish
commit fa6fe6ac03d098d9a71816ea91a4dbdc7c3946d6
Author: Alex Lu <hellosimon1...@hotmail.com>
Commit: Alex Lu <hellosimon1...@hotmail.com>
chore: use `project-root` from Emacs-28
---
dirvish.el | 6 +++---
extensions/dirvish-fd.el | 6 ++++--
2 files changed, 7 insertions(+), 5 deletions(-)
diff --git a/dirvish.el b/dirvish.el
index 9e5783bb6c..66025607bf 100644
--- a/dirvish.el
+++ b/dirvish.el
@@ -27,7 +27,7 @@
(declare-function ansi-color-apply-on-region "ansi-color")
(declare-function dirvish-fd-find "dirvish-fd")
(declare-function dirvish-tramp-noselect "dirvish-tramp")
-(declare-function project-roots "project")
+(declare-function project-root "project")
;;;; User Options
@@ -439,8 +439,8 @@ ALIST is window arguments passed to
`window--display-buffer'."
(defun dirvish--get-project-root (&optional directory)
"Get project root path of DIRECTORY."
(when-let* ((pj (project-current nil directory))
- (pj-roots (project-roots pj)))
- (expand-file-name (car pj-roots))))
+ (pj-root (project-root pj)))
+ (expand-file-name pj-root)))
(defun dirvish--get-parent-path (path)
"Get parent directory of PATH."
diff --git a/extensions/dirvish-fd.el b/extensions/dirvish-fd.el
index 94392fe2e0..35d6780d38 100644
--- a/extensions/dirvish-fd.el
+++ b/extensions/dirvish-fd.el
@@ -254,8 +254,10 @@ Raise an error if fd executable is not available."
;;;###autoload
(defun dirvish-fd-jump (&optional current-dir-p)
"Browse directories using `fd' command.
-This command takes a while to index all the directories the first
-time you run it. After the indexing, it fires up instantly.
+This command takes a while to index all the directories the first time
+you run it. After the indexing, it fires up instantly except for those
+huge directories such as root. It is recommended to setup your
+.fdignore properly before using this command.
If called with \\`C-u' or if CURRENT-DIR-P holds the value 4,
search for directories in the current directory. Otherwise,
