From 8c4d353a989d44d7c95758ef3b5e21342783913a Mon Sep 17 00:00:00 2001 From: bd Date: Sat, 18 May 2024 01:42:03 -0600 Subject: Improve dwm/emacs integration bindings --- .config/emacs/modules/bd--tabs.el | 10 ++++++++++ 1 file changed, 10 insertions(+) (limited to '.config/emacs/modules/bd--tabs.el') diff --git a/.config/emacs/modules/bd--tabs.el b/.config/emacs/modules/bd--tabs.el index f85c226..e5e11f9 100644 --- a/.config/emacs/modules/bd--tabs.el +++ b/.config/emacs/modules/bd--tabs.el @@ -41,6 +41,16 @@ (keymap-global-set "C-x p v" 'magit-project-status) +(defun bd/contextual-shell () + "Opens the current project's shell, +or a default shell if no project is open." + (interactive) + (let ((project (project-current))) + (if project + (project-shell) + (shell)))) + + (setq tab-bar-tab-name-function #'bd/tab-bar-name-function) -- cgit v1.2.3