From 41009efecc51fab54fc0f2ca379a12769c3008e8 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Fri, 9 Apr 2021 12:50:11 -0500
Subject: Load clisp for slime

---
 early-init.el | 4 +++-
 init.el       | 9 ++++++++-
 2 files changed, 11 insertions(+), 2 deletions(-)

diff --git a/early-init.el b/early-init.el
index 8515fa9..7f19bfe 100644
--- a/early-init.el
+++ b/early-init.el
@@ -96,7 +96,9 @@
                     (expand-file-name "~/.local/bin")
                     (expand-file-name "~/usr/bin")
                     (expand-file-name "~/cmd")
-                    (expand-file-name "~/mingw64/bin")))
+                    (expand-file-name "~/mingw64/bin")
+                    (expand-file-name "~/clisp-2.49/"))
+              exec-path)
   (when (file-exists-p path)
     (add-to-list 'exec-path path :append)))
 
diff --git a/init.el b/init.el
index 05a1382..1eae7e0 100644
--- a/init.el
+++ b/init.el
@@ -737,13 +737,20 @@ if ripgrep is installed, otherwise `consult-grep'."
   (setup (:straight eros)
     (:hook-into emacs-lisp-mode)))
 
+(setup (:straight geiser))
+
+(when-let (lisp-bin (or (executable-find "clisp")
+                        (executable-find "sbcl")))
+  (setup (:straight slime)
+    (require 'slime-autoloads)
+    (:option inferior-lisp-program lisp-bin)))
+
 (when (executable-find "fennel")
   (setup (:straight fennel-mode)
     (autoload 'fennel-mode "fennel-mode" nil t)
     (autoload 'fennel-repl "fennel-mode" nil t)
     (:option (append auto-mode-alist) '("\\.fnl\\'" . fennel-mode))))
 
-(setup (:straight geiser))
 
 (setup (:straight lua-mode)
   (:option (append auto-mode-alist) '("\\.lua\\'" . lua-mode)))
-- 
cgit 1.4.1-21-gabe81