Improved tide-project-root to understand git and package.json

diff --git a/lisp/my-file-modes.el b/lisp/my-file-modes.el
index 11456e23beed1240cd3e7789a3a996d5869cfbaa..a010ac7e68a865d4683ff0019017d725bcd22f2c 100644 (file)
--- a/lisp/my-file-modes.el
+++ b/lisp/my-file-modes.el
@@ -42,6 +42,20 @@
 (add-hook 'typescript-mode-hook #'tide-setup)
 (add-hook 'typescript-mode-hook #'js2-refactor-mode)
 
+(defun tide-project-root ()
+  (or
+   tide-project-root
+   (let ((root (or (locate-dominating-file default-directory "tsconfig.json")
+                   (locate-dominating-file default-directory "jsconfig.json")
+                   (locate-dominating-file default-directory ".git")
+                   (locate-dominating-file default-directory "package.json"))))
+     (unless root
+       (message (tide-join (list "Couldn't locate JavaScript project root folder. Using '" default-directory "' as project root.")))
+       (setq root default-directory))
+     (let ((full-path (expand-file-name root)))
+       (setq tide-project-root full-path)
+       full-path))))
+
 (require 'js2-refactor)
 (js2r-add-keybindings-with-prefix "C-c C-m")
 (setq js2r-always-insert-parens-around-arrow-function-params t)