From 817fc10ea1bc4377e99c0f82dbc2e161179b0b3e Mon Sep 17 00:00:00 2001
From: bd <bdunahu@colostate.edu>
Date: Tue, 21 May 2024 23:47:19 -0600
Subject: Remove contextual shell for now

---
 .config/emacs/modules/bd--tabs.el | 10 ----------
 .config/guix/modules/shell.scm    |  2 +-
 2 files changed, 1 insertion(+), 11 deletions(-)

diff --git a/.config/emacs/modules/bd--tabs.el b/.config/emacs/modules/bd--tabs.el
index e5e11f9..f85c226 100644
--- a/.config/emacs/modules/bd--tabs.el
+++ b/.config/emacs/modules/bd--tabs.el
@@ -41,16 +41,6 @@
 (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)
 
 
diff --git a/.config/guix/modules/shell.scm b/.config/guix/modules/shell.scm
index 1381c24..38676f2 100644
--- a/.config/guix/modules/shell.scm
+++ b/.config/guix/modules/shell.scm
@@ -22,7 +22,7 @@
                         ("suspend" . "sudo bash -c 'echo mem > /sys/power/state'")
                         ("vi" . "vim")
                         ("xeb" . "emacsclient -nce '(switch-to-buffer nil)'")
-                        ("xet" . "emacsclient -nce '(bd/contextual-shell)'")
+                        ("xet" . "emacsclient -nce '(shell)'")
                         ("ytta" . "yt-dlp --extract-audio --format bestaudio/best")
                         ("yttv" . "yt-dlp -f b")))
 
-- 
cgit v1.2.3