refining keybinds for lisps

This commit is contained in:
Matt Nish-Lapidus 2023-11-05 14:34:18 -05:00
parent f6aae022ff
commit a301c44d62
2 changed files with 26 additions and 8 deletions

View file

@ -79,13 +79,18 @@
"." #'meow-bounds-of-thing
"\\" #'bookmark-jump
"'" #'repeat
":" #'eval-last-sexp
"=" #'meow--eval-sexp
"[" #'sp-backward-sexp
"]" #'sp-forward-sexp
"{" #'sp-backward-up-sexp
"}" #'sp-down-sexp
"<escape>" #'corfu-quit))
(defun meow--eval-sexp ()
(interactive)
(if (derived-mode-p 'lisp-mode)
(sly-eval-defun)
(eros-eval-defun nil)))
(defun meow--post-isearch-function ()
(unless isearch-mode-end-hook-quit