From c3213c988f7ae183912d85300bcca7b7da2c39bf Mon Sep 17 00:00:00 2001
From: not manx <boku@plum.moe>
Date: Thu, 25 Jun 2020 09:39:18 +0000
Subject: [PATCH] Unbind C-c x in Slime/Lisp mode

---
 config.org | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/config.org b/config.org
index d882e7f..77d4288 100644
--- a/config.org
+++ b/config.org
@@ -99,6 +99,10 @@ Always ensure packages are installed. Log to ~*Messages*~.
 *** slime
 sbcl is in a werid place on Gentoo.
 #+BEGIN_SRC emacs-lisp
+(defun manx/lisp-keys ()
+  (local-set-key (kbd "C-c e") 'slime-eval-defun)
+  (define-key slime-mode-indirect-map (kbd "C-c x") nil))
+
 (use-package slime
   :defer t
   :custom
@@ -109,6 +113,9 @@ sbcl is in a werid place on Gentoo.
   :init
   (use-package slime-company)
   (add-hook 'lisp-mode-hook 'slime-mode)
+  (add-hook 'slime-mode 'manx/lisp-keys)
+  (unbind-key "C-c x" slime-mode-map)
+  (unbind-key "C-c x" slime-mode-indirect-map)
   (slime-setup '(slime-fancy slime-company)))
 #+END_SRC
 *** htmlize