common/home-manager/emacs: make xe/tabnew-shell open projectile shells if it can

Signed-off-by: Xe Iaso <me@xeiaso.net>
2023-02-04 13:50:35 -05:00 · 2023-02-04 13:50:35 -05:00 · 709a618a2d
parent 9c960a866a
commit 709a618a2d
1 changed files with 4 additions and 1 deletions
--- a/common/home-manager/emacs/xe-tools.el
+++ b/common/home-manager/emacs/xe-tools.el
@ -26,7 +26,10 @@ cell (regexp . minor-mode)."
  "Opens a shell in a new tab (tmux Control-b c)."
  (interactive)
  (tab-bar-new-tab 1)
-  (vterm)
+  (let ((proj-type (projectile-project-type)))
+    (if (eq proj-type 'nil)
+        (vterm)
+        (projectile-run-vterm)))
  (rename-uniquely))

 (provide 'xe-tools)