From 48d6cb476fefc2ce92c3c6dee827b20e5759438e Mon Sep 17 00:00:00 2001
From: Chris Cochrun <chris@cochrun.xyz>
Date: Thu, 1 Jun 2023 16:48:35 -0500
Subject: [PATCH] adding leader key opening of sly

---
 README.org | 4 ++++
 init.el    | 4 ++++
 2 files changed, 8 insertions(+)

diff --git a/README.org b/README.org
index e4f6c1af..58554c28 100644
--- a/README.org
+++ b/README.org
@@ -520,6 +520,10 @@ This evil-collection package includes a lot of other evil based things.
     "wL" '(evil-window-move-far-right :which-key "right window")
     ";" '(execute-extended-command :which-key "execute command")
     ":" '(eval-expression :which-key "evaluate expression"))
+  (chris/leader-keys
+    :states 'normal
+    :keymaps 'lisp-mode
+    "e" '(sly-eval-defun :which-key "evaluate top level"))
   (general-def 'minibuffer-local-map
     "C-v" 'evil-paste-after)
   (general-def 'normal
diff --git a/init.el b/init.el
index 8405fe00..97973c1e 100644
--- a/init.el
+++ b/init.el
@@ -288,6 +288,10 @@
     "wL" '(evil-window-move-far-right :which-key "right window")
     ";" '(execute-extended-command :which-key "execute command")
     ":" '(eval-expression :which-key "evaluate expression"))
+  (chris/leader-keys
+    :states 'normal
+    :keymaps 'lisp-mode
+    "e" '(sly-eval-defun :which-key "evaluate top level"))
   (general-def 'minibuffer-local-map
     "C-v" 'evil-paste-after)
   (general-def 'normal