Disable paredit for slime

This commit is contained in:
Marcus Kammer 2024-07-24 22:40:13 +02:00
parent 990c748f8b
commit 183bf8680f
Signed by: marcuskammer
GPG key ID: C374817BE285268F

View file

@ -34,11 +34,11 @@ Uses `mk/hyperspec-dir-locations' to find the directory."
;; Stop SLIME's REPL from grabbing DEL,
;; which is annoying when backspacing over a '('
(defun override-slime-repl-bindings-with-paredit ()
(define-key slime-repl-mode-map
(read-kbd-macro paredit-backward-delete-key) nil))
;; (defun override-slime-repl-bindings-with-paredit ()
;; (define-key slime-repl-mode-map
;; (read-kbd-macro paredit-backward-delete-key) nil))
(add-hook 'slime-repl-mode-hook 'override-slime-repl-bindings-with-paredit)
;; (add-hook 'slime-repl-mode-hook 'override-slime-repl-bindings-with-paredit)
(setq common-lisp-hyperspec-symbol-table
(concat common-lisp-hyperspec-root "Data/Map_Sym.txt"))
@ -380,8 +380,7 @@ Uses `mk/hyperspec-dir-locations' to find the directory."
(ielm-mode . paredit-mode)
(lisp-mode . paredit-mode)
(lisp-interaction-mode . paredit-mode)
(scheme-mode . paredit-mode)
(slime-repl-mode . paredit-mode))
(scheme-mode . paredit-mode))
:bind (:map paredit-mode-map
("M-s" . nil)
("C-M-s" . paredit-splice-sexp)))