From b72e00b6caae8c160466de09548232e63d4259c2 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Tue, 25 Feb 2020 10:26:21 -0500 Subject: [PATCH] Bind `SPC p D` to +default/discover-projects Closes #2601 --- modules/config/default/+evil-bindings.el | 1 + modules/config/default/autoload/files.el | 9 +++++++++ 2 files changed, 10 insertions(+) diff --git a/modules/config/default/+evil-bindings.el b/modules/config/default/+evil-bindings.el index 5d5851f8f..70ab26aba 100644 --- a/modules/config/default/+evil-bindings.el +++ b/modules/config/default/+evil-bindings.el @@ -539,6 +539,7 @@ :desc "Compile in project" "c" #'projectile-compile-project :desc "Repeat last command" "C" #'projectile-repeat-last-command :desc "Remove known project" "d" #'projectile-remove-known-project + :desc "Discover projects in folder" "D" #'+default/discover-projects :desc "Edit project .dir-locals" "e" #'projectile-edit-dir-locals :desc "Find file in project" "f" #'projectile-find-file :desc "Find file in other project" "F" #'doom/find-file-in-other-project diff --git a/modules/config/default/autoload/files.el b/modules/config/default/autoload/files.el index ee25f33a0..3c90f6d23 100644 --- a/modules/config/default/autoload/files.el +++ b/modules/config/default/autoload/files.el @@ -40,3 +40,12 @@ (if (featurep! :completion ivy) (call-interactively #'counsel-file-jump) (λ! (doom-project-find-file default-directory)))) + +;;;###autoload +(defun +default/discover-projects (arg) + "Discover projects in `projectile-project-search-path'. +If prefix ARG is non-nil, prompt for the search path." + (interactive "P") + (if arg + (call-interactively #'projectile-discover-projects-in-directory) + (mapc #'projectile-discover-projects-in-directory projectile-project-search-path)))