~octaspire/dotfiles: GNU/Emacs: add optional main project for projectile

7d167e7794d6e9edeba5aeb780722c3b6f5ce56f — octaspire 2 months ago 2b46d61

GNU/Emacs: add optional main project for projectile

  * Function `projectile-project-root' is adviced to
    return the main project if it is defined. Otherwise
    the function is run normally.

patch browse

1 files changed, 6 insertions(+), 1 deletions(-)

M emacs/.config/emacs/init.el

M emacs/.config/emacs/init.el => emacs/.config/emacs/init.el +6 -1

@@ 33,6 33,8 @@
 (setq octaspire/dark-mode
       (getenv "OCTASPIRE_EMACS_DARK_MODE"))
 
+(setq octaspire/projectile-main-project nil)
+
 ;; Package 'exec-path-from-shell' should be installed as early as possible,
 ;; because without it all the tests using 'executable-find' might fail to find
 ;; existing executables in macOS.


@@ 211,7 213,10 @@ adding it to the kill ring as a new kill."
 	      (when (octaspire/lisp-found-p)
 		(setq projectile-project-search-path
 		      '("~/quicklisp/local-projects/"))))
-	    (projectile-mode +1)))
+	    (projectile-mode +1)
+	    (advice-add 'projectile-project-root :before-until
+			(lambda (&rest args)
+			  octaspire/projectile-main-project))))
 
 (let ((name (executable-find "aspell")))
   (when name