From 30c3e7efc63946a0b9017988686c2621f36d54e2 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Sat, 21 Jan 2023 12:54:07 -0600
Subject: Install gauche-mode

This seems like a truly good scheme.
---
 init.el | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

(limited to 'init.el')

diff --git a/init.el b/init.el
index 95f3687..de13f13 100644
--- a/init.el
+++ b/init.el
@@ -850,3 +850,18 @@ With PREFIX, prompt to change the current dictionary."
 
 (use-package rec-mode
   :ensure t)
+
+(use-package gauche-mode
+  :vc (:url "https://github.com/duckwork/gauche-mode")
+  :mode "\\.scm\\'"
+  :config
+  (setopt gauche-mode-info-language 'en
+          scheme-program-name "gosh -i"
+          scheme-compile-exp-command "%s")
+  (add-to-list 'scheme-source-modes 'gauche-mode)
+  (setf (alist-get "\\*scheme\\*" display-buffer-alist nil nil #'equal)
+        '((display-buffer-reuse-window
+           display-buffer-pop-up-window)
+          (inhibit-same-window . t)))
+  (add-hook 'gauche-mode-hook #'enable-gauche-paredit-mode)
+  (add-hook 'inferior-scheme-mode-hook #'enable-gauche-paredit-mode))
-- 
cgit 1.4.1-21-gabe81