hiro/doom-modeline
1
0
Fork 0
mirror of https://github.com/vale981/doom-modeline synced 2025-03-04 17:01:39 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

Set doom-modeline-project-detection to auto.

Browse source
This commit is contained in:
Vincent Zhang 2021-08-24 00:06:28 +08:00
parent 749e860d4e
commit 5ed7a1bd0e
2 changed files with 16 additions and 18 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
README.md
View file

@ -190,13 +190,12 @@ Run `M-x customize-group RET doom-modeline RET` or set the variables.
(setq doom-modeline-window-width-limit fill-column)
;; How to detect the project root.
;; The default priority of detection is `ffip' > `projectile' > `project'.
;; nil means to use `default-directory'.
;; The project management packages have some issues on detecting project root.
;; e.g. `projectile' doesn't handle symlink folders well, while `project' is unable
;; to hanle sub-projects.
;; You can specify one if you encounter the issue.
(setq doom-modeline-project-detection 'project)
(setq doom-modeline-project-detection 'auto)
;; Determines the style used by `doom-modeline-buffer-file-name'.
;;

31
doom-modeline-core.el
View file

@ -181,21 +181,17 @@ displayed."
(const :tag "Disable" nil))
:group 'doom-modeline)
(defcustom doom-modeline-project-detection
(cond ((fboundp 'ffip-get-project-root-directory) 'ffip)
((fboundp 'projectile-project-root) 'projectile)
((fboundp 'project-current) 'project)
(t nil))
(defcustom doom-modeline-project-detection 'auto
"How to detect the project root.
The default priority is `ffip' > `projectile' > `project'.
nil means to use `default-directory'.
The project management packages have some issues on detecting project root.
e.g. `projectile' doesn't handle symlink folders well, while `project' is
unable to hanle sub-projects.
Specify another one if you encounter the issue."
:type '(choice (const :tag "Find File in Project" ffip)
:type '(choice (const :tag "Auto-detect" auto)
(const :tag "Find File in Project" ffip)
(const :tag "Projectile" projectile)
(const :tag "Built-in Project" project)
(const :tag "Disable" nil))
@ -1179,18 +1175,21 @@ respectively."
Return nil if no project was found."
(or doom-modeline--project-root
(setq doom-modeline--project-root
(pcase doom-modeline-project-detection
(pcase (if (eq doom-modeline-project-detection 'auto)
(cond
((fboundp 'ffip-get-project-root-directory) 'ffip)
((fboundp 'projectile-project-root) 'projectile)
((fboundp 'project-current) 'project)
(t 'default))
doom-modeline-project-detection)
('ffip
(when (fboundp 'ffip-get-project-root-directory)
(let ((inhibit-message t))
(ffip-get-project-root-directory))))
(let ((inhibit-message t))
(ffip-get-project-root-directory)))
('projectile
(when (fboundp 'projectile-project-root)
(projectile-project-root)))
(projectile-project-root))
('project
(when (fboundp 'project-current)
(when-let ((project (project-current)))
(expand-file-name (cdr project)))))))))
(when-let ((project (project-current)))
(expand-file-name (cdr project))))))))
(defun doom-modeline-project-p ()
"Check if the file is in a project."