From e190748bf6dd7baf13bf3f661843c657495138f8 Mon Sep 17 00:00:00 2001
From: Levi <lneely@pascom.net>
Date: Mon, 7 Oct 2024 10:50:53 +0200
Subject: [PATCH] corfu, term at project root

---
 emacs/module/module-corfu.el      |  4 ++--
 emacs/module/module-projectile.el | 10 ++++++++++
 2 files changed, 12 insertions(+), 2 deletions(-)

diff --git a/emacs/module/module-corfu.el b/emacs/module/module-corfu.el
index 20e4d49..b436f38 100644
--- a/emacs/module/module-corfu.el
+++ b/emacs/module/module-corfu.el
@@ -9,8 +9,8 @@
 (require 'module-pkg)
 (pkg/require 'corfu)
 
-(setq corfu-cycle t)                ;; Enable cycling for `corfu-next/previous'
-(setq corfu-auto t)                 ;; Enable auto completion
+(setq corfu-cycle nil)                ;; Enable cycling for `corfu-next/previous'
+(setq corfu-auto nil)                 ;; Enable auto completion
 (setq corfu-separator ?\s)          ;; Orderless field separator
 (setq corfu-quit-at-boundary t)   ;; Never quit at completion boundary
 (setq corfu-quit-no-match t)      ;; Never quit, even if there is no match
diff --git a/emacs/module/module-projectile.el b/emacs/module/module-projectile.el
index 00137c4..a32b1d6 100644
--- a/emacs/module/module-projectile.el
+++ b/emacs/module/module-projectile.el
@@ -11,6 +11,16 @@
 
 (projectile-mode +1)
 
+(defun open-terminal-at-project-root ()
+  "Open an external terminal emulator at the project root directory."
+  (interactive)
+  (let* ((project-root (projectile-project-root))
+         (terminal-program "xterm")
+         (command (concat terminal-program " -e 'cd " project-root " && $SHELL'")))
+    (if project-root
+        (start-process-shell-command "external-terminal" nil command)
+      (message "Not in a project"))))
+
 (provide 'module-projectile)
 
 ;;; module-projectile.el ends here.