From 8a31758526c4d4b3e3049630fc00fd404287615b Mon Sep 17 00:00:00 2001
From: Timo Wilken
Date: Sun, 22 Jan 2023 22:23:21 +0100
Subject: Improve geiser keybindings

---
 tw/home/files/emacs-init.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

(limited to 'tw')

diff --git a/tw/home/files/emacs-init.el b/tw/home/files/emacs-init.el
index d4bc13aa..d96e2909 100644
--- a/tw/home/files/emacs-init.el
+++ b/tw/home/files/emacs-init.el
@@ -303,11 +303,15 @@
 
 (use-package geiser
   :after (evil)
-  :commands (geiser geiser-eval-buffer geiser-eval-definition geiser-eval-region geiser-eval-last-sexp)
+  :commands (geiser
+             geiser-eval-buffer geiser-eval-definition geiser-eval-region
+             geiser-eval-last-sexp geiser-mode-switch-to-repl
+             geiser-mode-switch-to-repl-and-enter)
   :hook (scheme-mode . geiser-autodoc-mode)
   :config
   (evil-define-key '(normal visual) scheme-mode-map
-    (kbd "<localleader>i") #'geiser
+    (kbd "<localleader>i") #'geiser-mode-switch-to-repl
+    (kbd "<localleader>I") #'geiser-mode-switch-to-repl-and-enter
     (kbd "<localleader>eb") #'geiser-eval-buffer
     (kbd "<localleader>ef") #'geiser-eval-definition
     (kbd "<localleader>er") #'geiser-eval-region
-- 
cgit v1.2.3